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E 1 Einführung in die Benutzung 
des DCAM-Benutzerhandbuchs 


1.1 Allgemeines 


Die Beschreibung der DCAM-COBOL-Schnittstelle besteht aus 2 Handbüchern. Damit soll 
jedem Anwender das Richtige geboten werden, sei es, daß er programmiert, sei es, daß er 
sich nur informieren will (siehe auch Bild 1-1). 


DCAM Programmschnittstellen DCAM COBOL-Aufrufe 
Kapitel Kapitel 


*Standort 


Bild 1-1 Aufbau der Einführung und des Programmierhandbuchs 


Wie soll der DCAM-Programmierer vorgehen? 


Er sollte mit einem gründlichen Studium des Manuals ‘DCAM Programmschnittstellen’ 
beginnen. Erst wenn er dieses Manual durchgearbeitet hat, besitzt er die Vorkenntnisse, 
die für das vorliegende Benutzerhandbuch nötig sind. | 


Die Absicht des Verfassers ist es, daß auch am Stil und Aufbau der beiden 
Beschreibungen zu erkennen ist: Das Manual 'DCAM Programmschnittstellen’ ist so 
geschrieben, daß es “sequentiell” zu lesen ist. Der Benutzer wird Schritt für Schritt in 


DCAM eingeführt: 
e Zuerst durch eine allgemeine Einführung, die eine Orientierung ermöglicht. 


e Im Kapitel 2 sind Grundbegriffe erläutert und Vorüberlegungen zur Programmplanung 
angestellt. 


Kapitel 3 enthält die detaillierte Beschreibung aller Funktionen. 


e Im Kapitel 4 ist die Codierung und Ausführung von DCAM-Programmen behandelt, 
wobei ein eigener Abschnitt der COBOL-Verwendung gewidmet ist. 
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In diesem Handbuch fir den Benutzer sind im Kapitel 1 drei Fragen beantwortet: 
e Wie sind die DCAM-Manuale zu benutzen? 

ወ Welche Metasprache ist in ihnen verwendet? 

e Was genügt für einen einfachen Einsatzfall? 


Im Kapitel 2 wird die Einführung aus 'DCAM Programmschnittstellen’ weitergefuhrt. Es 
enthalt die Beschreibung der Datenstrukturen, wie sie in der WORKING-STORAGE 
SECTION anzulegen sind. Ferner werden die formalen Kriterien für die Aufrufe in der 
PROCEDURE DIVISION gezeigt. Damit ist der Rahmen des Programms abgesteckt. 


Kapitel 3 enthalt die vollstandige Beschreibung eines jeden Aufrufs mit der notigen 
Versorgung der Felder. Ferner werden die Rückinformationen gezeigt, die nach 
Ausführung eines Aufrufs auszuwerten sind. Das Kapitel ist nach Funktionen gegliedert, 
entsprechend dem prinzipiellen Ablauf im Programm. Die Gliederung entspricht dem 
Kapitel 3 im Manual 'DCAM Programmschnittstellen’, so daß dort ohne Querverweise 
nachgeschlagen werden kann. 


Um anhand von Beispielen mögliche Lösungswege finden zu können, wurde Kapitel 4 
angefügt. Es enthält Beispiele, die in unterschiedlichem Stadium der Ausführung gezeigt 
werden. Eine laufende Erweiterung dieses Kapitels ist geplant. 


DCAM Programmschnittstellen DCAM COBOL-Aufrufe 
Kapitel Kapitel 


START 


(WORKING- ፪፪ STORAGE 
SECTION) 


2 


B (PROCE DURE DIVISION) 7 


/ 


FK praktische / Arbeit 


| 
Anhänge 4 


Bild 1-2 Benutzung der Manuale 
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© 1.2 Zeichenerklärung 


Um eine möglichst einfache Handhabung zu bieten, sind in dieser Beschreibung Zeichen 
als sogenannte Metasymbole verwendet, die bereits weitgehend aus anderen Manualen 
des BS2000 bekannt sind. Sie sind in der folgenden Tabelle 1-1 erläutert. 


GROSSBUCHSTABEN | bezeichnen Konstanten, “YES” 
die der Benutzer in 
dieser Form angeben muB. 
Hier sind dies in der 
Regel Literale, die in 
Anfuhrungszeichen 
gesetzt werden. 


partnername 


bezeichnen Variablen, 
deren Inhalt von Fall zu 
Fall verschieden sein 
kann. Der Benutzer muß 
sie bei der Eingabe 
durch aktuelle Werte 
ersetzen. 

Die Form der Eingabe 
wird durch die Art der 
PICTURE-Klausel be- 
stimmt. 


kleinbuchstaben 


Alternative Angaben sind 
in geschweifte Klammern 
eingeschlossen. 

Sie werden untereinander 
geschrieben. 


” YES” 
[kennwort4] 
” YES” 
[ ] 
Li NO” 


” YES” 
anne | 
“NO” 


Eckige Klammern schlie- 
ßen Angaben ein, die 
weggelassen werden 
können. 


Standardwerte sind 
kursiv gedruckt. 
Die sonst übliche Kenn- 
zeichnung durch Unter- 
streichung wurde hier 
nicht gewählt, da die 
Unterstreichung bei der 
Darstellung von COBOL- 
Sprachmitteln in anderer 
Bedeutung verwendet 
wird. 


kursiv 


Tabelle 1-1 Metasymbole 
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Zeichen Erläuterung Beispiele 


() Ein Ausdruck, der zur (0 < länge < 9) 
Darstellung von Variab- 
len benutzt wird, steht 
in runden Klammern. 
Diese Darstellung soll 
auf einen Blick den 
Wertebereich zeigen. 

Da dazu mehrere Zeichen 
notwendig sind, ist auch 
diese formale Eingren- 
zung erforderlich. 


IN 


Beziehung zweier Werte: 
Der links stehende Wert | nummer < 2047 0 < position 
sei kleiner oder gleich 


dem rechts stehenden; 
der rechts stehende Wert 
sei größer oder gleich 
dem links stehenden. 


links stehende Wert anzahl > 1 
größer oder gleich 

rechts stehenden; 

rechts stehende Wert 

kleiner oder gleich 

links stehenden. 


WM 


x Das oben erläuterte gilt| 0 < länge menge < 9 
> ebenfalls, jedoch ohne 
die Gleichsetzung. 


Tabelle 1-1 Metasymbole (Fortsetzung) 
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1.3 


Lösungswege bei einfachen Einsatzfällen 


Bereits im Manual ‘DCAM Programmschnittstellen’ wurden mögliche Aufgaben für 
DCAM-Programme gezeigt. Sie können in einfache und komplexe Einsatzfälle unterschie- 
den werden. Die Trennung ist willkürlich und auch durch keine Merkmale der Schnittstelle 
selbst bestimmt. Dadurch soll lediglich dem Anwender geholfen werden, bei einfachen 
Einsatzfällen schnell eine Lösung seiner Aufgabe zu finden. 

Als einfache Einsatzfälle sind denkbar: 


— Kommunikation mit einem Partner 
— Einschritt-Dialoge mit mehreren Partnern (nur Datenübermittlung) 
— Einsatz der Zeilen-Datenstation 


Die im folgenden Kapitel 2 beschriebenen grundsätzlichen Funktionen und vor allem die 
Datenstrukturen werden immer vollständig benötigt. 


Bei der Anwendung der DCAM-Funktionen können einige Teile entbehrt werden. Folgende 
Tabelle 1-2 zeigt den Mindesteinsatz der DCAM-Schnittstelle und gibt Hinweise fur die 
Auswahl in Kapitel 3. 


Funktion Mindest-Einsatz Abschnitt im Kapitel 3 


Existenz Eröffnen einer einfach benutz-| 3.1.1.1 
baren Anwendung 


Eröffnen einer mehrfach SS QEA SS | 


benutzbaren Anwendung durch 
einen Sekundärprozeß 


Empfangen einer Nachricht oder| 3.3.2 
Transportquittung 


Verbindung Beschreibung der aufzubauenden| 3.2.1.1 

(nur bei Verbindung 

Primär- 

prozessen) Auffordern zum Aufbau Sé 3 PS, 
Annahme einer Aufforderung 3.2.3.8 

Datenüber- Senden einer Nachricht KW oe 

a 


Tabelle 1-2 Mindesteinsatz der DCAM-Schnittstelle 


Durch die grafische Darstellung im Kapitel 3 und die farbige Markierung einzelner Felder 
werden dort weitere Hilfen angeboten. 


Die Beispiele des Abschnitts 4.1 sind zudem auf einfache Einsatzfàlle zugeschnitten. 
Insbesondere dem 'UCON'-Anwender (Universal Consol Support) wird dort ein Modellpro- 
gramm gezeigt. 
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@ 2? Eigenschaften der DCAM-COBOL-Schnittstelle 


2.1 Übersicht 


Eine Einführung in die Eigenschaften der COBOL-Schnittstelle wurde bereits in der 
Beschreibung der Programmschnittstellen gegeben. 


Für jeden Aufruf an DCAM werden zur Datenubergabe Bereiche benötigt, sogenannte 
Datenstrukturen und Ubergabebereiche. Sie werden vom Benutzer in der WORKING- 
STORAGE SECTION bereitgestellt. 


Jeder Aufruf an DCAM im Befehlsteil des Programms (PROCEDURE DIVISION) wird in 
folgenden Schritten ausgeführt: 


1. Schritt: Eintragen von Daten zur Ubergabe an DCAM in die Datenstrukturen und 
Ubergabebereiche. 


2. 56ከቨቪ: Angabe der erforderlichen Datenstrukturen und Ubergabebereiche bei 
ፍ Abgabe des Aufrufs an DCAM. 
3. Schritt: 


4. Schritt: In die Datenstrukturen und Übergabebereiche trägt DCAM Rückinformatio- 
nen ein, in jedem Fall die Rückmeldung. Ansonsten werden Feldinhalte 
nicht verändert. DCAM beendet den Aufruf und gibt dem Programm die 
Steuerung zurück. 


DCAM holt sich bei Bearbeitung des Aufrufs die erforderlichen Daten aus 
den Bereichen und bringt sie in eigene Speicherbereiche. 


5. Schritt: Der Benutzer wertet die Rückinformationen aus, indem er auf die von 
| DCAM ausgefüllten Felder zugreift. 


Einen Überblick über die Grundschritte der Verarbeitung gibt Bild 2-1. 
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DCAM: 


@ Bearbeitung des Aufrufs, dazu evtl. Übernahme der 
aktuellen Feldinhalte in eigene Bereiche 


መ Übergabe der Rückinformationen und Beenden des 
Aufrufs 


Bild 2-1 DCAM-COBOL-Schnittstelle 
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2.2.1 


Beschreibung der Datenstrukturen und Ubergabebereiche 
(WORKING-STORAGE SECTION) 


Allgemeines 


In der WORKING-STORAGE SECTION werden die. Datenstrukturen und Ubergabebereiche 
definiert. Sie werden in diesem Kapitel nach folgendem Schema beschrieben: 


Muster fur Stufennummern PICTURE-Klausel Versorgung 


e Die Musterangaben für Stufennummern, Datensatz- und Datennamen sind Vorschläge. 
Der Benutzer ist weitgehend frei in der Auswahl anderer Einteilungen und 
Bezeichnungen. Die hier gewählten entsprechen den Beschreibungstexten und sollen 
das Auffinden der Felder erleichtern. 


e Bei den Angaben in den PICTURE-Klauseln muß sich der Benutzer an die hier 
gezeigten Angaben halten. Das betrifft sowohl Art und Länge als auch die Reihenfolge 
der Felder. 


e Die Versorgung der einzelnen Felder wird in diesem Abschnitt kurz beschrieben. 
Weitere Angaben sind bei der Funktionsbeschreibung in Kapitel 3 zu finden. 


e Standardwerte brauchen nicht angegeben zu werden. Sie werden eingestellt, wenn ein 
Feld gelöscht ist, d.h. mit Nullen (ZEROES) oder Leerzeichen (SPACES) gefüllt ist oder 
wenn nichts angegeben ist (LOW-VALUE). Sie sind durch Kursivdruck kennzeichnet. 


e In diesem Kapitel werden nur die Benutzereinträge erläutert. Einträge von DCAM 
werden ausschließlich im Kapitel 3 beschrieben. 


Die Anwendungsstruktur, Verbindungsstruktur und Befehlsstruktur müssen mindestens 
einmal vollständig im Programm vorhanden sein. Die Verteilungsstruktur ist nur 
notwendig, wenn die Nachrichtenverteilung anhand von Verteilcodes erfolgen soll. Die 
Wartestruktur muß nur angegeben werden, wenn das Programm nach asynchronen 
CALL-Aufrufen auf das Eintreffen eines Ereignisses warten soll. 


Weitere Übergabebereiche sind je nach Aufruf notwendig. 


Hinweis 


Werden Datenstrukturen mehrfach angelegt, ist die COPY-Funktion zu empfehlen. Sie 
erlaubt das mehrfache Kopieren von vorgefertigten Strukturen aus einer COBOL-Biblio- 
thek, die mit dem Dienstprogramm COBLUR eingerichtet wurde. Das Kopieren übernimmt 
der Übersetzer. Für alle Strukturen stehen COPY-Elemente zur Verfügung: 


YDDCUAPL für die Anwendungsstruktur 
YDDCUCOM für die Befehlsstruktur 
YDDCUCON für die Verbindungsstruktur 
YDDCUDIS für die Verteilungsstruktur 
YDDCUWAI für die Wartestruktur 
FHSMAINP für die FHS-Struktur 
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Anwendungsstruktur 


2.2.2 Anwendungsstruktur (APP-NAME) 


Funktion 


In der Anwendungsstruktur wird eine DCAM-Anwendung beschrieben. 


Format 


Muster für Stufennummern, 
Datensatz- und Datennamen 


01 APP-NAME 


02 
02 
02 
02 


02 


02 


02 


02 


02 


02 


02 


APPNAME 
PRONAME 
DISNAME 
LINK 


LINKMOD 


LOGPASS 


USEPASS 


USEPW 


VERIFV 


ATTR. 


03 SHARE 


03 LOGON 


03 DISCO 


03 TACK 


FDBK SYNCHRONIZED. 


03 RCD 
03 ECD 
03 IND 


FILLER 


PICTURE- 
Klausel 


PIC X(8). 
PIC X(8). 
PIC X(8). 
PIC X(8). 


PIC X(3). 


PIC X(4). 
PIC X(4). 


PIC X(4). 


PIC X(3). 


PIC X(3). 


PIC X(3). 


PIC X(3). 


PIC X(3). 


PIC 9(4) COMP. 


PIC 9(4) COMP. 


PIC 9(4) COMP. 


PIC X(9). 


Versorgung 


anwendungsname 
prozessorname 
[verteilungsnanme] 
[kettungsname] 
TER: 
Maġi 
[kennwort1] 
[kennwort2] 
[kennwort3] 


n" PRM” 
[ “5፻ር” ] 
“ለዐ" 


ሰብር - 
jiġ 
"ለዕ" 
TES” 
| [ 
"ከ0" 
ንጋ 
| | 
“NO” 


SC Dé 
“REQ” 


"፣ NO” 
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Anwendungsstruktur. 


ሌ Versorgung 
02 APPNAME PIC X(8). anwendungsname 


anwendungsname gibt den Namen der DCAM-Anwendung an. Das 1. Zeichen muB 
alphabetisch sein (A-Z, 8, #, $). Die restlichen 7 Zeichen können 
alphanumerisch angegeben werden (A-Z, 0-9, @, $, #). Der Name muß 
linksbündig ausgerichtet in das Feld eingetragen werden; ggf. ist es 
nach rechts mit Leerzeichen (SPACES) aufzufüllen. '$' als 1. Zeichen 
ist für Systemanwendungen reserviert. 


Das Feld wird bei allen Unterprogrammaufrufen, die die bezeichnete DCAM-Anwendung 
betreffen, ausgewertet. 


02 PRONAME PIC X(8). prozessorname 
prozessorname Symbolischer Name des eigenen Prozessors. 
Er wird zurückgegeben bei 


— YOPEN 


© 02 DISNAME PIC X(8). verteilungsname 


verteilungsname gibt den Namen an, unter dem diesem Prozeß eine Verteilcode-Gruppe 
zugeordnet werden kann. Das 1. Zeichen muß alphabetisch sein (A-Z, 
8, #, $). Die restlichen 7 Zeichen müssen alphanumerisch angegeben 
werden (A-Z, 0-9, 8, #, $). Der Name muß linksbündig ausgerichtet in 
das Feld eingetragen werden; ggf. ist es nach rechts mit Leerzeichen 
(SPACES) aufzufüllen. 


Das Feld wird ausgewertet bei 


— YOPEN in einem Primär-/Sekundärprozeß, jedoch nur, wenn auch im Primärprozeß 
SHARE und DISCO mit 'VES' versorgt wurden. 


02 LINK PIC X(8). kettungsname 


kettungsname gibt den Kettungsnamen (LINK) für die Namenszuweisung (/APPL- 
Kommando, Anhang A.6) an. Das 1. Zeichen muß alphabetisch sein 
(A-Z, @, #, $). Die restlichen 7 Zeichen müssen alphanumerisch 
angegeben werden (A-Z, 0-9, @, #, $). Der Name muß linksbündig 
ausgerichtet in das Feld eingetragen werden; ggf. ist es nach rechts 
mit Leerzeichen (SPACES) aufzufüllen. 


“ Das Feld wird ausgewertet bei 


— YOPEN in einem Primär-/Sekundärprozeß. 
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Anwendungsstruktur 


” PER” 
02 LINKMOD PIC X(3). 
TEN: 


Die Information aus der CLT (Communication Link Table) soll dem Programm zur 
Verfügung stehen: 


“PER” fur die Dauer des Programmlaufs (permanent). 
“TEM” fur die Dauer des Aufrufs (temporar). 
Das Feld wird ausgewertet bei 


— YOPEN in einem Primär-/Sekundärprozeß, jedoch nur, wenn auch ein Kettungsname 
definiert wird. 


02 LOGPASS PIC X(4). kennwort1 


kennworti ist die Vorgabe eines Kennworts zum Aufbau einer logischen 
Verbindung. Jeder Partner, der an diese Anwendung eine Verbin- 
dungsaufforderung richtet, muB auch das Kennwort angeben. Es kann 
aus beliebigen alphanumerischen Zeichen bestehen. Leerzeichen 
(SPACES) bedeuten: Kein Kennwort vorgegeben. 


Das Feld wird nur ausgewertet bei 


— YOPEN durch einen Primärprozeß, wenn gleichzeitig das Attribut LOGON mit 'VES' 
versorgt wird. 


02 USEPASS PIC X(8). kennwort2 


kennwort2 ist die Vorgabe eines Kennworts zum Anschluß eines Sekundärprozes- 
ses an eine bestehende Anwendung. Jeder Sekundärprozeß muß 
dieses Kennwort im USEPW-Operanden angeben, wenn er diese 
DCAM-Anwendung ebenfalls eröffnen will. Es kann aus beliebigen 
alphanumerischen Zeichen bestehen. Leerzeichen (SPACES) bedeuten: 
Kein Kennwort vorgegeben. 


Das Feld wird nur ausgewertet bei 


— YOPEN durch einen Primärprozeß, wenn gleichzeitig das Attribut SHARE mit 'VES' 
versorgt wird. 


02 USEPW PIC X(4). kennwort3 


kennwort3 gibt das Kennwort zum Anschluß an eine bestehende Anwendung an, 
wie es durch den Primärprozeß im USEPASS-Operand vorgegeben 
oder wie es bei der Generierung für die Anwendung festgelegt wurde. 
Es kann aus beliebigen alphanumerischen Zeichen bestehen. Leerzei- 
chen (SPACES) bedeuten: Es wird kein Kennwort angegeben. 


Das Feld wird ausgewertet bei: 


— YOPEN durch einen Sekundärprozeß, wenn das Kennwort im Primärprozeß vorge- 
schrieben war. 


— YOPEN durch einen Primär- oder Sekundärprozeß, wenn die Anwendung bei der 
Generierung durch ein Kennwort geschützt ist. 
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Anwendungsstruktur 


© 'PRM' 
02 VERIFY PIC X(3). q'SEC' 


Der die DCAM-Anwendung eröffnende Prozeß will 


'PRM' der ersteröffnende sein (PRIMARV) oder 

"SEC’ ein nachfolgend eröffnender (SECONDARY) oder 
“NO” ein beliebiger (es wird nicht geprüft). 

Das Feld wird ausgewertet bei | 


— YOPEN durch einen Primär-/Sekundärprozeß. Bei negativem Ergebnis der Prüfung wird 
der Aufruf nicht ausgeführt. 


“YES” 
03 SHARE PIC X(3). 


Die DCAM-Anwendung kann entweder von | 
© "EST mehreren Prozessen benutzt werden (SHARE = mehrfach benutzbar) oder von 
'NO' einem einzigen Prozeß (NSHARE — einfach benutzbar). 
Das Feld wird ausgewertet bei 
— YOPEN durch einen Primärprozeß. 


— YOPEN durch einen Sekundärprozeß: Die Angabe von 'VES' ist hier obligatorisch. Fehlt 
sie, wird der Aufruf nicht ausgeführt. 


9607. 
03 LOGON PIC X(3). 


“NO” 
Aufforderungen zum Verbindungsaufbau werden grundsätzlich 
"YES" bearbeitet (LOGON) oder 

'NO' | nicht bearbeitet (NLOGON). 

Das Feld wird ausgewertet bei 


© — YOPEN durch einen Primärprozeß. 


“YES” 
03 DISCO PIC X(3). 


Die Nachrichtenverteilung erfolgt bei 


“YES” anhand von Verteilcodes in der Nachricht. Hierbei muß auch SHARE mit “YES” 
versorgt werden. 


'NO' aufgrund der Angabe bei VOPNCON bzw. VSEND oder VRECEIVE fur CS in der 
Befehisstruktur. Dort wird entweder die empfängerglobale Warteschlange 
(CS="NO”: CA-Zustand) oder die absenderspezifische Warteschlange eingestellt 
(CS-'VES': CS-Zustand). Die Nachrichten werden nicht über Verteilcodes 
verteilt. 


Das Feld wird ausgewertet bei 


— YOPEN durch einen Primärprozeß. 
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Anwendungsstruktur 


03 TACK PIC X(3). ብቡ 
” NO” 


| 
Die Quittung Uber einen Nachrichtentransport wird 

“PRI” dem Primärprozeß übergeben (PRIMTASK) oder 

MER an den Prozeß, der sie angefordert hat (REQTASK) oder 
'NO' nicht ubergeben (NOTACK). 


Dies gilt fur die gesamte Lebensdauer der Anwendung. Die Angaben bei VSEND müssen 
sich danach richten. 


Das Feld wird ausgewertet bei 


— YOPEN durch einen Primärprozeß. 
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Befehisstruktur 


2.2.3 Befehisstruktur (BEF-NAME) 


Funktion 


In der Befehlsstruktur werden die Operanden zur Ausführung einer DCAM-Funktion 
beschrieben. 


Format 


Muster für Stufennummern, PICTURE-Klausel | Versorgung 
Datensatz- und Datennamen 


01 BEF-NAME 
02 TOVAL PIC 9(4) COMP. (0 < በ < 9999) 
[ 
600 
02 SEQNO PIC 9(4) COMP. [ (0 < nummer x 9999)) 
03 SPEC PIC X(3). YES" 
[ ] 
03 CS PIC X(3). "YES” 
[ ] 
“NO” 
03 0 PIC X(3). "YES 
l ] 
03 ACCPT PIC X(3). "TES". 
[ ] 
"፣ NO” 
03 STP PIC X(3). 


03 DG PIC X(3). 


03 TRUNC PIC X(3). 
03 TACK PIC X(3). 


03 BELL PIC X(3). 


03 NORMAL PIC X(3). fe 
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Befehisstruktur 


Muster für Stufennummern, 
Datensatz- und Datennamen 


03 FHS 


02 FDB SYNCHRONIZED. 

03 ASEQNO 

03 TACKNO 

03 ARECLN 

03 FDBK. 
04 RCD 
04 ECD 
04 IND 

03 REASON REDEFINED FDBK. 
04 LOSCON-REASON. 


88 USER-DISCON 


88 INVALID-EDIT-DEPROT 


88 PTN-PROC-ERR 
88 PTN-NOT-AVAIL 
88 SYSTEM-DISCON 
88 PTN-LOST-CONN 
88 DISCON-NETWORK 
88 DISCON-WARNING 
| 88 PTN-CHAR-NACC 


88 ADM-DISCON 


88 SERVICE-DATA-ERR 
88 SERVICE-PROT-ERR 


88 TRANSP-SYSTEM-ERR 


88 SYNTAX-ERR-STA 


88 NETW-PRIO-NACC 


88 PTN-SYSTEM-SHORT 


88 PTN-VTSU-ERR 


PICTURE-Klausel 


PIC X(3). 


Versorgung 


“YES” 
[ ] 
“ለሪ m 


PIC 9(4) COMP. 


PIC 9(4) COMP. 


PIC 9(4) COMP. 


PIC 9(4) COMP. 


PIC 9(4) COMP. 


PIC 9(4) COMP. 


PIC 9(4) COMP. 


VALUE 0. 


VALUE 4. 


VALUE 8. 


VALUE 12. 


VALUE 16. 


VALUE 20. 


VALUE 24. 


VALUE 32. 


VALUE 36. 


VALUE 40. 


VALUE 44. 


VALUE 52. 


VALUE 56. 


VALUE 60. 


VALUE 84. 


VALUE 88. 


VALUE 92. 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-Z75-3 


Befehisstruktur 


Muster für Stufennummern, PICTURE-Klausel | Versorgung 
Datensatz- und Datennamen 


04 FILLER PIC X(4). 
02 OPTCD1. 
03 SYN PIC X(3). “YES” 
ተ 
03 FILLER 
02 FILLER 
Versorgung 
la XAK voor 
02 TOVAL PIC 9(4) COMP. 
600 
n gibt die Zeit an, die ein Aufruf wartet, falls er nicht sofort ausgefuhrt 


werden kann. Der maximale Wert ist 9999 Sekunden xxx). Die 
Abweichung kann wenige Sekunden betragen (abhangig von der 
ProzeBsteuerung). 

600 Sekunden ist der Standardwert. 


Ausnahme 
TOVAL=ZERO bedeutet unbegrenzte Wartezeit! 


xxx) Wird der COBRUN-Parameter ‘TRUNC=NO’ verwendet, so kann als maximaler 
Wert 32767 Sekunden angegeben werden. 


Das Feld wird ausgewertet bei 
— YOPNCON mit ACCPT="YES” und Q="YES”. 
— YRECEIVE, jedoch nur, wenn auch Q="YES” eingestellt wird. 


02 SEQNO PIC 9(4) COMP. [0 < nummer < 2048) 


nummer. gibt die Laufnummer der zu sendenden Nachricht an. Der Der 
maximale Wert ist 2048. Wird der COBRUN-Parameter ‘TRUNC=NO’ 
verwendet, so kann als maximaler Wert 32767 angegeben werden. 


Das Feld wird ausgewertet bei 
— YSEND. 


Die Laufnummer wird dem Kommunikationspartner übermittelt und im ASEQNO-Feld nach 
Ausführung eines YRECEIVE zur Verfügung gestellt. Wird für die Nachricht eine Quittung 
angefordert, so steht die Nummer der quittierten Nachricht nach dem Empfang der 
Quittung mit YRECEIVE im TACKNO-Feld. 
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Befehisstruktur 


"YES” 
03 SPEC PIC X(3). 


“NO” 
"YES: Der Aufruf ist auf einen spezifischen Partner bezogen (SPEC). 
'NO' Der Aufruf ist auf einen beliebigen Partner bezogen (ANV). 
Das Feld wird ausgewertet bei 

— YOPNCON mit ACCPT — 'VES'. 

— VRECEIVE. 

— VRESET. 


ርዕ 
03 CS PIC X(3). 


“NO” 
Nach Ausfuhrung des Aufrufs soll fur die weitere Datenubermittlung von diesem Partner 


NES die absenderspezifische Warteschlange eingestellt werden. (=CS-Zustand der 
Verbindung: Alle weiteren Nachrichten, die von diesem Partner eintreffen, 
werden in diese Warteschlange eingetragen und können nur mit SPEC="YES” 
abgeholt werden 1. 

Im Falle einer mehrfach benutzbaren DCAM-Anwendung gilt, daß nur der 
Prozeß, der den CS-Zustand verursacht hat, die nachfolgenden Nachrichten 
empfangen kann. 


'NO' die empfängerglobale Warteschlange eingestellt werden (=CA-Zustand der 
Verbindung: Alle weiteren Nachrichten, die von diesem Partner eintreffen, 
werden in diese Warteschlange eingetragen und können nur mit SPEC="NO” 
abgeholt werden). 


Das Feld wird ausgewertet bei 
— YOPNCON. 

— YSEND. 

— VRECEIVE. 


jedoch nur, wenn ohne Verteilcodes gearbeitet wird (DISCO—'NO' in der Anwendungs- 
struktur beim YOPEN des Primärprozesses). 


— YRESET; aber nur mit SPEC="YES” und DISCO —'NO' 


YES” 
03 0 PIC X(3). 


”N m 


Der Aufruf soll, wenn er nicht sofort ausgeführt werden kann, 


"YES? in eine Warteschlange eingetragen werden; die maximale Wartezeit wird in 
TOVAL angegeben. Bei einem asvnchronen Call wird vom System immer 'VES' 
eingesetzt. 

'NO' sofort beendet werden (NQ = Kein Eintrag in eine Warteschlange). 


Das Feld wird ausgewertet bei 
— YOPNCON mit ACCPT=’YES’. 
— VRECEIVE. 
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RS 
ዬ 03 ACCPT PIC X(3). 
” NO” 


Eine Aufforderung zum Verbindungsaufbau soll 
"TES angenommen werden (=ACCPT). 
'NO' ausgegeben werden (=ACQUIRE). 


Das Feld wird ausgewertet bei 


— YOPNCON. 


“Tee. 
03 STP PIC X(3). 


” NO” 
Für eine DCAM-Anwendung, die dieser Prozeß eröffnet hat, soll 


"YES" der STOP-Zustand eingestellt werden (Verbindungsaufforderungen werden 
zurückgewiesen). 


ዬ 'NO' der START-Zustand eingestellt werden (Verbindungsaufforderungen werden 
bearbeitet). 


Das Feld wird ausgewertet bei 


— YSETLOG, jedoch nur, wenn die Anwendung mit LOGON ="YES” eröffnet worden ist. 


“ELE” 
03 DG PIC X(3). "SUB" 
“GRP” 


Die Nachricht, die gesendet wird, ist 

"ELE" eine Teilnachricht (= ELEMENT) einer Untergruppe oder Gruppe von Daten. 
“SUB” die letzte Teilnachricht einer Untergruppe (= SUBGROUP) von Daten. 
"GRP" nicht unterteilt oder das letzte Element eine Gruppe (= GROUP) von Daten. 
Das Feld wird ausgewertet bei 


— YSEND, jedoch nur, wenn die angesprochene Verbindung mit EDIT="USR” oder 
EDIT="SYS” und TRANSF="PHY” aufgebaut wurde (siehe Verbindungsstruktur). 


Ca 
03 NORMAL PIC X(3). 


" NO” 
Die zu sendende Nachricht soll 
ES” mit normaler Priorität übermittelt werden. 


“NO” mit hoher Priorität übermittelt werden (=EXPRESS) und, wenn möglich, sofort 
zugestellt werden (bei Assembler-Programmen mit asynchroner EXPR-Meldung; 
siehe DCAM-Makroaufrufe). 


\ 


Das Feld wird ausgewertet bei 


— YSEND, jedoch nur, wenn die Verbindung mit EDIT="USR” aufgebaut worden ist. 
Sonst wird die Nachricht mit ECD=76 und RCD=12 (siehe Anhang A.4) zurückgewie- 
sen. 
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Befehisstruktur 


rue ML 
03 TRUNC PIC X(3). q'KEE' 
"VIR 


Wenn die empfangene Nachricht länger ist als im Empfangsbereich vorgesehen, so soll 
der zu lange Teil 


"TRO" abgeschnitten und weggeworfen werden (TRUNC). 


"KEE aufgehoben und angezeigt (siehe Anhang ል.2) werden (KEEP), so daß nach 
Einstellung des CS-Zustands (CS="YES”) der zu lange Teil mit weiteren 
YRECEIVE abgeholt werden kann. 


'VTK' so behandelt werden, wie es in der Verbindungsstruktur fir diese Verbindung 
eingestellt worden ist. 


Das Feld wird ausgewertet bei 


— YRECEIVE, jedoch nur bei Nachrichten, die länger als der Empfangsbereich sind. 


” YES” 
03 TACK PIC X(3). 


“NO” 
Fur die gesendete Nachricht wird eine positive Transportquittung 
‘Yoo angefordert. 

'NO' nicht angefordert (=NTACK). 

Das Feld wird ausgewertet bei 


— YSEND; allerdings ist erforderlich, um die später empfangene Quittung der Nachricht 
zuordnen zu können, auch die Laufnummer in SEQNO festzulegen. 


ንር). 
03 BELL PIC X(3). 
“NO” 


Nach einer Ausgabe an die Datenstation wird 
ES ein akustischer Alarm ausgelöst. 
'NO' kein akustischer Alarm ausgelöst. 
Das Feld wird ausgewertet bei 


— YSEND, jedoch nur, wenn die Verbindung mit EDIT="SYS” aufgebaut worden ist. 
Hinweis 


Die BELL-Funktion ist nur bei bestimmten Datenstationen mit einem Hardwaregeräte- 
zusatz möglich (8160, 8161, 8162, 9750). 
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| "YES” 
03 FHS PIC X(3). 


Befehlsstruktur 


“NO” 
Die Ein- bzw. Ausgabe der Nachrichten erfolgt 
"ES formatiert mit der integrierten Formatsteuerung FHS-C. 
'NO' ohne Unterstützung durch die integrierte Formatsteuerung FHS-C. 
Das Feld wird ausgewertet bei 

— YSEND. 

— VRECEIVE. 


Hinweis 


Will der Benutzer mit FHS="YES” Nachrichten ein- oder ausgeben, so muß er beim 
Verbindungsaufbau ('VOPNCON') oder mit der Funktion "Ändern der Eigenschaften 
einer Verbindung” ('WCHANGE') folgende Felder versorgen: 


EDIT mit 'SVS' für Nachrichtenaufbereitung durch das System. 
TRANSF mit 'FOR' für Formatsteuerung bei der Eingabe. 
TRANSF mit 'FOR' für Formatsteuerung bei der Ausgabe. 


Für FHS="YES” ist das kostenpflichtige Softwareprodukt FHS Voraussetzung. Der 
FHS-Modul MFHSCALL muß mit einer INCLUDE-Anweisung (vgl. Beschreibung des 
TSOSLNK) zum Programm gebunden werden. Fehlt der Modul, so wird der Aufruf mit 
FHS="YES” mit einem Returncode abgelehnt. 


267. 
03 SVN PIC X(3). 


” NO” 
Der Aufruf soll ausgeführt werden: 
WES. synchron. 


'NO' asvnchron. 


Hinweis 


Der Benutzer erhält die Kontrolle nach der Annahme-Bearbeitung des Aufrufs sofort 
wieder zurück. Die Beendigung des Aufrufs wird in die Ereignis-Warteschlange des 
Prozesses eingetragen (FIFO), und der Benutzer kann die Ereignisse mit YWAIT aus der 
Warteschlange abrufen. Es können bis zu 8 asynchrone CALL-Aufrufe vom gleichen 
Typ gleichzeitig abgesetzt werden, 


Der Aufruf ist beendet nach seiner erfolgreichen Ausführung, nach Zeitablauf bzw. 
nach Schließung der Verbindung oder Anwendung. 
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Verbindungsstruktur 


2.2.4 


Verbindungsstruktur (CONN-NAME) 


Funktion 


In der Verbindungsstruktur wird die logische Verbindung beschrieben. 


Format 


Muster fur Stufennummern, 
Datensatz- und Datennamen 


01 CONN-NAME 
02 PTNNAME 
02 PRONAME 
02 PASSWORD 
02 LINK 


02 LINKMOD 


02 DEPROT 


02 EDITIN. 


03 TRANSF 


03 GETBS 


03 GETFC 


03 LCASE 


02 EDITOUT. 


03 TRANSF 


03 HCOPY 


03 HOM 


02 EDIT 


PICTURE-Klausel 


PIC X(8). 
PIC X(8). 
PIC X(4). 
PIC X(8). 


PIC X(3). 
| PIC X(3). 
PIC X(3). 
PIC X(3). 


PIC X(3). 


PIC X(3). 


PIC X(3). 


PIC X(3). 


PIC እ(3). 


PIC X(3). 


Versorgung 


[partnername] 
[prozname] 
[kennwort4] 
[kettungsname] 
LLA PER LLA 
[ ] 
m TEM” 


[ “USR eg 
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Muster fir Stufennummern, 
Datensatz- und Datennamen 


02 


02 


02 


02 


02 


02 


PROC. 


03 TRUNC 

03 SYSCODE 
03 APPSTART 
MAXLN 


PTNCHAR. 
03 PTNTYPE 
03 DEVTYPE 
03 CHARSET 
03 DEVSEC 
EDITOUTI. 


03 EXTND 
03 LOGC 
03 ብፍ 
03 FILLER 
PROC1 


03 SIGNAL 


03 FILLER 


FILLER 
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PICTURE-Klausel | Versorgung 
PIC X(3). ዘ ዘ. 
[ ] 
" NO” 
PIC X(3). "YES. 
[ ] 
"፣ NO” 
PIC X(3). Si: 
[ ] 
PIC 9(4) COMP. በ < 9999 
[ ] 
4096 


PIC 9(4) COMP. 
PIC 9(4) COMP. 
PIC 9(4) COMP. 


PIC 9(4) COMP. 


TES. 
KH 
“NO” 


PIC X(3). “YES” 
IF) 

PIC X(3). TER 
Fe 

PIC X(15). 

PIC X(3). ” YES” 
(7) 


PIC X(9). 


Verbindungsstruktur 


Versorgung 


02 PTNNAME PIC X(8). partnername 


partnername 


Name des Kommunikationspartners, der adressiert wird. Das 1. 
Zeichen muß alphabetisch sein (A-Z, 8, tt, $). Die restlichen 7 Zeichen 
können alphanumerisch angegeben werden (A-Z, 0-9, e #, $). Der 
Name ጠህ6 linksbundig ausgerichtet in das Feld eingetragen werden, 
ggf. ist er nach rechts mit Leerzeichen (SPACES) aufzufillen. 


Das Feld wird ausgewertet bei 


— YOPNCON 


— YINQUIRE 


— YINQUIRE 


— YCHANGE. 


— YCLSCON. 


— YSEND. 


— YRECEIVE 


— YRECEIVE 


>- YRESET 


mit ACCPT-'NO' oder mit ACCPT-'VES' und SPEC-'VES'. 


mit der Funktion 'PTN' (=PTNCHAR). 


mit der Funktion 'TOP' (=TOPLOGON), jedoch trägt hier 
DCAM hier Namen ein. 


mit SPEC="YES”. 


mit SPEC="N0”, jedoch trägt hier DCAM den Namen ein. 


mit SPEC="YES”. 


02 PRONAME PIC X(8). prozname 


prozname 


Name des Prozessorknotens, an dem der Partner als Station 
angeschlossen ist. Er wird zusammen mit dem Partnernamen 
angegeben und bildet mit ihm die volle Adresse des Kommunikations- 
partners. Sein Format ist gleich dem Partnernamen; er wird auch 
zusammen mit ihm ausgewertet. 


02 PASSWORD PIC X(4). kennwort4 


kennwort4 


Angabe des Kennworts zum Verbindungsaufbau, wie es vorgeschrie- 
ben wurde (YOPEN des Kommunikationspartners mit Vorgabe von 
LOGPASS-kennworti bei APP-NAME bzw. durch /APPL-Kommando). 


Das Feld wird ausgewertet bei 


— YOPNCON mit ACCEPT="NO”, jedoch nur, wenn ein Kennwort vorgegeben worden ist. 
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© 02 LINK PIC X(8). kettungsname 


kettungsname gibt den Kettungsnamen (LINK) für die Namen-Zuweisung (/CONN- 
Kommando, Anhang A.6) an. Das 1. Zeichen muß alphabetisch sein 
(A-Z, 6, #, $). Die restlichen 7 Zeichen können alphanumerisch 
angegeben werden (A-Z, 0-9, @, #, $). Der Name muß linksbündig 
ausgerichtet in das Feld eingetragen werden; ggf. ist es nach rechts 
mit Leerzeichen (SPACES) aufzufüllen. 


Das Feld wird ausgewertet bei 


— YOPNCON. 


” PER” 
02 LINKMOD PIC X(3). 
TEN 


Die Information aus der CLT (Communication Link Table) soll dem Programm zur 
Verfügung stehen: 


'PER' für die Dauer des Programmlaufs (permanent). 
© 'TEM' fur die Dauer des Aufrufs (temporàr). 
Das Feld wird ausgewertet bei 


— YOPNCON, jedoch nur, wenn auch ein Kettungsname (LINK) angegeben wird. 


02 DEPROT PIC X(3). ”USR” 
Die Vereinbarung zur Steuerung der Datenübermittlung (Protokoll) trifft 


"USR” der Benutzer selbst. Eine Unterstützung durch das System ist erst für eine 
spätere DCAM-Version geplant. 


Das Feld wird ausgewertet bei 


— YOPNCON. 


” PHY” 
03 TRANSF PIC X(3). 4 "ያለ" 
“FOR” 


Fur die Nachrichtenaufbereitung durch das System bei der Eingabe soll 


- PHV” 


'LIN' die Zeilen-Datenstation benutzt werden. Das Svstem bereitet Nachrichten mit 
Hilfe der Zeilen-Datenstation auf. Mit numerischen Konstanten als Steuerzei- 
chen kann der Benutzer folgende Funktionen auslösen (siehe auch 2.2.7.3): 


Funktion Wirkung 
Neue Zeile Beginn einer neuen Zeile. 
CL Logisches Satzende. 


Shift Aus X'OE' Umschalten auf 2. Zeichenvorrat 
(falls vorhanden). 


Shift Ein Umschalten auf Standardzeichenvorrat. 


keine logische Datenstation benutzt werden (— 'PHVS'). 


BS X'16' Rückwärtsschritt. 
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'FOR' die Format-Datenstation benutzt werden, d.h. der Benutzer kann mit einer frei 
Wahlbaren Formatierungsroutine (z.B. FORM) oder mit der integrierten 
Formatsteuerung arbeiten. 


Das Feld wird ausgewertet bei 
— YOPNCON. 
— YCHANGE. 


jedoch nur, wenn EDIT="SYS” eingestellt ist. 


56. 
03 GETBS PIC X(3). 
“NO” 


Die Rückwärtsschritt-Zeichen bei der Eingabe werden 
YES” dem Benutzer übermittelt. 


'NO' vom Svstem als Loschzeichen interpretiert und daher zusammen mit dem zu 
loschenden Zeichen eliminiert (-NGETBS = keine Übergabe von Rückwärts- 
schritt-Zeichen [backspace characters). 


Das Feld wird ausgewertet bei 

— YOPNCON. 

— YCHANGE. 

jedoch nur, wenn EDIT="SYS” eingestellt wird und TRANSF — 'LIN' oder 'FOR'. 


Hinweis 


Diese Funktion ist nur sinnvoll bei Geräten, die Rückwärtsschritt-Zeichen erzeugen, z.B. 
bei der Schreibstation 8103. 


ይብ 
03 GETFC PIC X(3). 


“NO” 
Der logische Funktionscode einer Datenstation soll 

"YES" das 1. Zeichen der empfangenen Nachricht sein. 
“NO” nicht übergeben werden. 

Das Feld wird ausgewertet bei 

— YCHANGE. 

— YOPNCON. 
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"YVES: 
ዬ 03 LCASE PIC X(3). 
Kleinbuchstaben werden bei der Eingabe 
“YES” nicht umgesetzt, sondern It. EBCDIC-Tabelle als solche verschlüsselt übergeben. 
“NO” in Großbuchstaben umgesetzt (=NLCASE: Die DCAM-Anwendung erhält nur 


Großbuchstaben, auch wenn z.B. an der Datenstation Texte mit Kleinbuchsta- 
ben abgeschickt wurden). 


Das Feld wird ausgewertet bei 
— YOPNCON. 
— VCHANGE. 


jedoch nur, wenn EDIT — 'SVS' eingestellt wird. 


“PRY” 
03 TRANSF PIC X(3). + “LIN” 
"FORT 
ዬ Fur die Nachrichtenaufbereitung durch das Svstem bei der Ausgabe soll 
“PHY” keine logische Datenstation benutzt werden (=PHYS). 


“LIN” die Zeilen-Datenstation benutzt werden. Das System bereitet Nachrichten mit 
Hilfe der Zeilen-Datenstation auf. Mit numerischen Konstanten als Steuerzei- 
chen kann der Benutzer folgende Funktionen auslösen (siehe auch 2.2.7.4 und 
Anhang A.7). 


“FOR” die Format-Datenstation benutzt werden. Der Benutzer kann mit einer frei 
wählbaren Formatierungsroutine (z.B. FORM) oder mit der integrierten 
Formatsteuerung FHS arbeiten. 


Das Feld wird ausgewertet bei 
— YOPNCON. 
— YCHANGE. 


jedoch nur, wenn auch EDIT — 'SVS' eingestellt wird. 


” YES” 
© 03 HCOPY PIC X(3). 


Die auszugebende Nachricht soll zusätzlich 

“YES” auf einen vorhandenen Drucker (hardcopy device) ausgegeben werden. 
“NO” nicht auf einen Drucker ausgegeben werden (=NHCOPY). 

Das Feld wird ausgewertet bei 

— YOPNCON. 

— YCHANGE. 


jedoch nur, wenn auch EDIT="SYS” und TRANSF="PHY” oder “LIN” eingestellt wird. Bei ` 
TRANSF="FOR” werden für diese Funktion die Operanden der Formatanweisungen 
benutzt. 
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” YES” 
03 HOM PIC X(3). 
ማለ m 


Gibt an, wie logische Zeilen behandelt werden. 
YES! Alle logischen Zeilen einer Nachricht werden als Einheit betrachtet. 
'NO' Jede einzelne logische Zeile wird als Einheit betrachtet. 


Das Feld wird ausgewertet bei 


— VOPNCON. 
— VCHANGE. 

“USR” 
02 EDIT PIC X(3). 

"SYS" 


Die Nachrichtenaufbereitung erfolgt durch 


'USR' den Benutzer(— USER: Geeignetes Verfahren für die Datenibermittlung zwi- 
schen DCAM-Anwendungen). 


"SYS" das Datenkommunikationssystem (=SYSTEM: Für die Ein-/Ausgabe können 
logische Datenstationen benutzt werden; die Nachrichten müssen im EBCDI- 
Code vorliegen). 


Das Feld wird ausgewertet bei 


— YOPNCON. 


Hinweis 


EDIT="SYS” ist nur möglich, wenn die Datenstation an einen Kommunikationsrechner 
des Typs TRANSDATA 960 angeschlossen ist. 


“YES” 
03 TRUNC PIC X(3). 


"፣ NO” 


Wenn die empfangene Nachricht länger ist, als im Empfangsbereich vorgesehen, soll der 
zu lange Teil 


"YES: abgeschnitten und weggeworfen werden. 


'NO' aufgehoben und angezeigt (siehe Anhang ል.2) werden (— KEEP), so daß nach 
Einstellung des CS-Zustands (CS="YES” bei BEF-NAME) der zu lange Teil mit 
einem weiteren YRECEIVE abgeholt werden kann. 


Das Feld wird ausgewertet bei 
— YOPNCON. 
— YCHANGE. 


Hinweis 


Die hier getroffene Festlegung kann bei einem YRECEIVE wieder geändert werden 
(siehe TRUNC bei BEF-NAME). 
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፻፳). 
© 03 SYSCODE PIC X(3). 


“NO” 


Die zu empfangende Nachricht soll 


"ES falls nötig, durch das System in den EBCDI-Code übersetzt werden; zu 
sendende Nachrichten erwartet das System im EBCDIC. 


“NO” nicht Ubersetzt werden, so በ86 sie im Code des Kommunikationspartners 
übergeben wird - umgekehrt gilt das Gleiche (=BINARY: Die Daten werden 
transparent übermittelt). 


Das Feld wird ausgewertet bei 
— YOPNCON. 
— VCHANGE. 


jedoch nur, wenn auch EDIT="USR” gesetzt wird. 


"YES” 
03 APPSTART PIC X(3). 
Mit der Datenübermittlung beginnt 


"YES" diese DCAM-Anwendung (PROC=APPSTART: bei ACCPT="YES” ist dies die 
endgültige Festlegung; bei ACCPT — 'NO' ein Vorschlag). 


“NO” ein beliebiger Partner (=ANYSTART: es wird nichts festgelegt). 
Das Feld wird ausgewertet bei 


— YOPNCON. 


02 MAXLN PIC 9(4) COMP. 


enthält die maximale Nachrichtenlange, die eine Anwendung auf dieser Verbindung 
senden will. DCAM prüft die Angabe des Benutzers, reduziert sie notfalls auf die maximal 
mögliche Nachrichtenlänge und schreibt sie in das MAXLN-Feld zurück. 


Die maximale Nachrichtenlänge ist abhängig von der jeweiligen Konfiguration und der 
Systemgenerierung. 


Wird der COBRUN-Parameter TRUNC — NO' verwendet, so kann als maximaler Wert 64535 
© angegeben werden. 


"YES” 
03 EXTND PIC X(3). 


Die Daten werden 


"ER geschützt ausgegeben. Ungeschützte Felder müssen durch logische Steuerzei- 
chen definiert werden und werden alle bei der Eingabe zur DVA übertragen. 
Diese Angabe ist nur möglich bei EDITOUT="LIN” und für die Datenstationen 
TD 816x, TD 975x und 3270. Die EDITOPTIONS BELL, GETFC und LCASE werden 
ignoriert. 


“NO” ungeschutzt ausgegeben. 
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m YES” 
03 LOGC PIC X(3). 
"፣ NO LA 


Die logischen Steuerzeichen werden 
"YES ausgewertet. 


'NO' nicht ausgewertet. 


CES" 
03 LACK PIC X(3). 


Eine logische Quittung 


NES. wird angefordert. 


'NO' wird nicht angefordert. 
” YES” 
03 SIGNAL PIC X(3). 
“NO” 


Datenflußkontrolle; bei der Auflösung einer Stausituation 


“YES” erhalt der Benutzer ein GO-Signal. 


“NO” wird der Benutzer nicht benachrichtigt. 
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2.2.5 Verteilungsstruktur (VTLG-NAME) 


Funktion 


In der Verteilungsstruktur werden Lage und Lànge des Verteilcodes in der Nachricht und 
die Codes gruppenweise beschrieben. 


Format 


Muster fur Stufennummern, PICTURE-Klausel | Versorgung 


Datensatz- und Datennamen 


01 VTLG-NAME 

02 CODEIDEN 

02 CODELN 

02 CODEPOS 

02 CODEIND 

02 FILLER 

02 CODEGRNO 

02 CODEGROUP 
03 CODENAM 
03 CODENO 


03 CODEVAL 


Versorgung 


PIC X(8). strukturname 

PIC 9(4) COMP. (0 < länge < 9) 

PIC 9(4) COMP. (0 < position < 256) 
PIC X. codeanzeiger 

PIC X. 

PIC 9(4) COMP. (0 < anzahl < 9) 
OCCURS 8 TIMES. 

PIC X(4). gruppenname 

PIC 9(4) COMP. (0 < menge < 9) 


PIC X(8). codes 
OCCURS 8 TIMES. 


02 CODEIDEN PIC X(8). strukturname 


strukturname 


Symbolischer Name einer Verteilungsstruktur zur Identifikation bei der 
weiteren Verarbeitung. Er kann aus beliebigen alphanumerischen 
Zeichen bestehen und muß linksbündig in das Feld eingetragen 
werden. Freie Stellen sind nach rechts mit Leerzeichen (SPACES) 
aufzufüllen. 


Das Feld wird ausgewertet bei 


— YOPNCON. 
— YCHANGE. 
— YPERMIT. 
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02 CODELN PIC 9(4) COMP. (0 < länge < 9) 


länge Länge des Verteilcodes in der Nachricht an. Ein Verteilcode kann 
maximal 8 Zeichen lang sein. Die Eintragung gilt für den (die) 
nachfolgend beschriebenen Verteilcode(s). 


Das Feld wird ausgewertet bei 


— YOPNCON. 


02 CODEPOS PIC 9(4) COMP. (O < position < 256) 


position Position des Verteilcodes in der Nachricht an. Es wird die Distanz 
relativ zum 1. Zeichen der Nachricht angegeben. Das 1. Zeichen hat 
die Distanz 0. Die Distanz darf 


— den Wert 255 nicht überschreiten. 


— nicht größer sein als die Gesamtlänge (Nachricht und Verteilcode) 
der Nachricht. Der Eintrag gilt für den (die) nachfolgend 
beschriebenen Verteilcode(s). 


Das Feld wird ausgewertet bei 


— YOPNCON. 


02 CODEIND PIC X. codeanzeiger 


codeanzeiger Zeichen, das den Verteilcode ankündigt. Ist der Wert dieses 
Operanden ungleich LOW-VALUE, so kann ein impliziter Verteilcode 
benutzt werden. In diesem Falle gilt: Wird dieses Zeichen auf der 
Stelle CODEPOS gefunden, so folgt darauf der Verteilcode in der 
Länge von CODELN (jedoch höchstens 7). Wird es nicht gefunden, so 
wird die Nachricht an den Prozeß übergeben, der auch die 
vorhergehende Nachricht erhalten hat (impliziter Verteilcode). 


Ist CODEIND mit LOW-VALUE versorgt, so wird in jeder Nachricht 
explizit ein Verteilcode erwartet. 


02 CODEGRNO PIC 9(4) COMP. (O < anzahl < 9) 


anzahl Anzahl der angeschlossenen Verteilcode-Gruppen. Maximal 8 Gruppen 
sind anschließbar; sie sind in der folgenden Tabelle beschrieben 
(02 CODEGROUP OCCURS 8 TIMES). 


Das Feld wird ausgewertet bei 
— YOPNCON. 

— YCHANGE. 

— YPERMIT. 
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Verteilungsstruktur 


02 CODENAM PIC X(4). gruppenname 


gruppenname Svmbolischer Name einer Verteilcodegruppe zur Identifikation bei der 
weiteren Verarbeitung. Er kann aus beliebigen alphanumerischen 
Zeichen bestehen und muß linksbündig in das Feld eingetragen 
werden. Freie Stellen sind nach rechts mit Leerzeichen (SPACES) 
aufzufüllen. 


Das Feld wird ausgewertet bei 
— YOPNCON. 

— YCHANGE. 

— YPERMIT. 


02 CODENO PIC 9(4) COMP. (0 < menge < 9) 


menge Anzahl der in einer Gruppe beschriebenen Codes. In einer Gruppe 
können maximal 8 Codes (siehe folgende Tabelle) beschrieben werden. 


Das Feld wird ausgewertet bei 
— YOPNCON. 

— YCHANGE. 

— YPERMIT. 


02 CODEVAL PIC X(8) OCCURS 8 TIMES. code 


code gibt den Verteilcodewert an. Er kann aus beliebigen alphanumerischen 
Zeichen bestehen und muß linksbündig in das Feld eingetragen 
werden. Nach rechts sind freie Stellen mit Leerzeichen (SPACES) 
aufzufüllen. Die Codes, die im Zusammenhang mit einem Strukturna- 
men (CODEIDEN) beschrieben werden, müssen eindeutig sein. 


Das Feld wird ausgewertet bei 
— YOPNCON. 

— YCHANGE. 

— YPERMIT. 
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Wartestruktur 


2.2.6 


Wartestruktur (WAIT-NAME) 


Funktion 


In der Wartestruktur werden die Operanden zum Warten auf Beendigung von asvnchronen 
CALL-Aufrufen beschrieben. 


Format 


Muster fur Stufennummern, PICTURE-Klausel | Versorgung 
Datensatz- und Datennamen 


01 WAIT-NAME. 


02 LIFETIM PIC 9(5) COMP. (1 < በ < 42300) 
[ 
60 
02 FILLER PIC X(12). 


02 DCAM-RETURN-INFO. 


03 RETCODE. 
04 WAIT-RC. 
05 RRS PIC 9(4) COMP. 
05 RSI PIC 9(4) COMP. 


03 EREIGNIS 
88 NOEVENT | VALUE O. 
88 LETTER VALUE 1. 
88 OPENED VALUE 2. 
88 GOSIGNAL| VALUE 3. 
88 LOSCON VALUE 4. 


03 FILLER PIC X(3). 


Versorgung 


(1< n < 42300) 
02 LIFETIM PIC 9(5) COMP. 


60 


n ist die Zeitangabe in Sekunden, während der der Prozeß auf das Eintreffen 
eines Ereignisses warten soll. Die Rücksprunginformation (RETCODE) zeigt an, ob das 
Ereignis eingetreten ist oder die Wartezeit überschritten wurde. 


Das Feld wird ausgewertet bei 


— YWAIT. 
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Weitere Ubergabebereiche 


Weitere Ubergabebereiche 
Standardbereiche 


Für einzelne Aufrufe werden weitere Übergabebereiche benötigt, die - je nach 
Verwendung - eine unterschiedliche Funktion erfüllen. In ihrem Aufbau sind sie wie folgt 
gegliedert: 


Format 


Muster für Stufennummern, PICTURE-Klausel | Versorgung 
Datensatz- und Datennamen 


01 BEREICH 

02 LAENGE PIC 9(4) COMP. länge 

02 TEXT PIC At. "E. datenfeld 
Versorgung 


02 LAENGE PIC 9(4) COMP. länge 


lange Die fur den jeweiligen Aufruf erforderliche Länge des Datenfeldes. 
Tabelle 2-1 zeigt die möglichen Längen an. 


Bei welchem Aufruf das Feld ausgewertet wird, zeigt ebenfalls Tabelle 2-1. 


02 DATENFELD PIC ... datenfeld 


datenfeld Inhalt des Feldes. Er ist - je nach Verwendung - unterschiedlich, die 
Art des Feldes (numerisch, alphanumerisch) und die weitere Auftei- 
lung ebenfalls. Tabelle 2-1 zeigt die Inhalte der einzelnen Felder. Art 
und Aufbau sind im jeweiligen Abschnitt von Kapitel 3 gezeigt. 


Bei welchem Aufruf das Feld ausgewertet wird, ist ebenfalls in Tabelle 2-1 gezeigt. 
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Weitere Ubergabebereiche 


Anzeige des Zustands der Anwendung | VINQUIRE 


(Empfangsdaten) 
14 Partnerdaten | Partnerdaten zum Verbindungsaufbau | Verbindungsaufbau f. ET 


(1 < n < 8) ExpreBnachricht oder Normal- VSEND 
nachricht (Sendedaten) 
(1 < n < maxln) 


(1 < n < maxln) Nachricht (Empfangsdaten) YRECEIVE 


Tabelle 2-1 Standardbereiche 


Hinweis 


Durch die Gleichartigkeit der Felder besteht die Möglichkeit, sie zu überlagern. 


ein Beispiel: 


01 BEREICH. 
02 LAENGE PIC 9(4) COMP VALUE IS 80. 
02 DATENFELD. 
03 FILLER PIC X(80). 
02 ANW-BEREICH REDEFINES DATENFELD. 
03 ZUSTAND PIC 9(4) COMP. 
03 FILLER PIC X(78). 
02 TOPL-BEREICH REDEFINES DATENFELD. 
03 PTNTYPE PIC 9(4) COMP. 
03 DEVTYPE PIC 9(4) COMP. 
03 CHARSET PIC 9(4) COMP. 
03 DEVSEC PIC 9(4) COMP. 


03 PEDIT PIC X(3). 
03 PPROC PIC X(3). 
03 FILLER PIC X(66). 


USW. 


siehe 
Abschnitt 


ር.) 


Wu 


ሹሬ | WW 


።ች 


call 
ላ 


.3 


$. 
ሽር 


PN 


ech 


Dazu 
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2.2.7.2 


Weitere Ubergabebereiche 


Bereiche für den YOPNCON-Aufruf 


Funktion 


Für den YOPNCON-Aufruf werden 2 weitere Übergabebereiche benötigt. Sie sind in ihrem 
Aufbau wie folgt gegliedert: 


Format 


Muster für Stufennummern, PICTURE-Klausel | Versorgung 
Datensatz- und Datennamen 


01 BEREICHI. 
02 LAENGE1 PIC 9(4) COMP. länge 
02 TEXTI PIC X(..). nachricht 


01 BEREICH2. 


02 LAENGE2 PIC 9(4) COMP. länge 
02 TEXT2 FIR Al.. F. datenfeld 
BEREICH1 


Name einer Struktur, die die LOGON-Nachricht beinhaltet, die an den Partner geschickt 
werden soll. 
BEREICH2 


Name der Struktur, in die die Verbindungsnachricht vom Partner gebracht werden soll. 


Hinweis 


BEREICH2 ist nur bei der Angabe ACCEPT = NO möglich. 


Versorgung 


02 LAENGE1 PIC 9(4) COMP. länge 


länge Länge der LOGON-Nachricht, die an den Partner geschickt werden 
soll. Wenn keine Verbindungsnachricht an den Partner gesendet 
werden soll, von ihm aber eine erwartet wird, muß der Operand mit 0 
angegeben werden (dient als Platzhalter). 


02 TEXT1 PIC X(..). nachricht 


nachricht Nachricht, die an den Partner geschickt werden soll. 
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Weitere Ubergabebereiche 


02 LAENGE2 PIC 9(4) COMP. länge 


länge Länge des Bereiches, in den die Verbindungsnachricht vom Partner 
gebracht werden soll. Ist der Wert ዐ angegeben, wird keine Nachricht 
empfangen. Nach dem Aufruf steht dort entweder die tatsächliche 
Länge der Verbindungsnachricht oder die Anzahl der abgeschnittenen 
Stellen, wenn der Bereich zu kurz war, um sie aufzunehmen. 


02 TEXT2 PIC X(..). datenfeld 


datenfeld Bereich, in den die Verbindungsnachricht vom Partner geschrieben 
werden soll. 
2.2.7.3 Einzelfelder 
Funktion 


Für verschiedene Aufrufe werden noch einzelne Felder benötigt. 


Formate 
Muster für Stufennummern, PICTURE-Klausel | Versorgung 
Datensatz- und Datennamen 
77 FUNKTION PIC X(3). "APP 

" ፐዐ p' 

LLA PTN” 

L CNT' 
77 VT-NAME PIC X(8). verteilungsname 
77 CG-NAME PIC X(4). gruppenname 
77 DCAMVER PIC 9(4) 

COMP-3. 


88 DCAMV8 VALUE 800. 


Versorgung 
APR" 
ንኩ 
77 FUNKTION PIC X(3). 
"PIN 
"ONT" 


In diesem Feld werden die unterschiedlichen Funktionen des YINQUIRE-Aufrufs 
angegeben, zur Abfrage 


“APP” des Zustands der DCAM-Anwendung (APPSTAT). 

"TOR der Partnerinformationen vor dem Verbindungsaufbau (TOPLOGON). 
'PTN' der Partnercharakteristika (PTNCHAR). 

“CNT” der Partneranzahl (COUNTPTN). 

Das Feld wird ausgewertet bei 


— VINQUIRE. 
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Weitere Ubergabebereiche 


77 VT-NAME PIC X(8). verteilungsname 


verteilungsname 
gibt einen Verteilungsnamen an. Das 1. Zeichen muß alphabetisch sein 
(A-Z, 8, #, $). Die restlichen 7 Zeichen können alphanumerisch 
angegeben werden (A-Z, 0-9, e, #, $). Der Name muß linksbündig 
ausgerichtet in das Feld eingetragen werden; ggf. ist es nach rechts 
mit Leerzeichen (SPACES) aufzufüllen. 


Das Feld wird ausgewertet bei 
— YPERMIT. 
— YFORBID. 


77 CG-NAME PIC X(4). gruppenname 


gruppenname Name einer Verteilcode-Gruppe. Der Name muß alphabetisch sein 
(A-Z) und linksbündig ausgerichtet in das Feld eingetragen werden; 
ggf. ist es nach rechts mit Leerzeichen (SPACES) aufzufüllen. 


Das Feld wird ausgewertet bei 

— YPERMIT. 

77 DCAMVER PIC 9(4) COMP-3. 

In diesem Feld wird die funktionelle Version von DCAM angegeben. 


DCAMV8 Es konnen alle Funktionen der DCAM V8.0 benutzt werden. Diese 
Angabe ist notwendig, wenn die neuen Funktionen der DCAM V8.0 
MAXLN-Angabe, asynchrone Verarbeitung, neue EDIT-Options, Ver- 
bindungsnachrichten mit YOPNCON ACCEPT) benutzt werden sollen. 
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Weitere Ubergabebereiche 


2.2.7.4 Bereiche mit Steuerzeichen J 


Mit numerischen Konstanten als Steuerzeichen kann die Ausgabe der Nachricht beeinflußt 
werden, falls TRANSF="LIN” gesetzt ist. Diese Steuerzeichen werden in eigenen 
Bereichen aufgebaut. Eine Aufstellung finden sie im Anhang A.7. 


Folgende Steuerzeichen gibt es: 


— NEW-LINE 

— NEW-PAGE 

— CONT-SAME-LINE 
— CONT-LINE 

-  CONT-COL 

— SHEET-FEED 

— CONT-ACT-POS 

— EMPH-LAVOUTI 

— EMPH-LAVOUT2 
— EMPH-LAVOUT3 
— EMPH-LAYOUT4 
— NORMAL-LAVOUT 
— DARK-LAVOUT 

— PART-LINE-UP 

— PART-LINE-DOWN J 
— SECOND-CHAR-SET 
— NORMAL-CHAR-SET 
— START-PROT-AREA 
— END-PROT-AREA 
— START-NUM-DATA 
— VERT-MOVE-IND 
— HORIZ-MOVE-IND 
— LEFT-MARGIN 

— START-PROP-TYPE 
— END-PROP-TYPE 
— MAX-LINE-LEN 

— MAX-LINE-NUM 

— DELETE-CHAR 

— BACKSPACE 

— SUBSTITUTE 

— PHYS-ESC 

— PHYS-DC 

— PHYS-HT 

— PHYS-VT 


Sie werden an der gewunschten Stelle in die Nachricht eingeschoben bzw. die 
empfangene Nachricht kann nach den Inhalten dieser Steuerfelder abgefragt werden. J 
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2.3 


2.3.1 


CALL-Aufrufe 
Beschreibung der CALL-Aufrufe (PROCEDURE DIVISION) 


Die Module, die jeweils die aufgerufenen Funktionen realisieren, werden vom Benutzerpro- 
gramm als Unterprogramme aufgerufen. Die bei COBOL verwendete Unterprogrammtech- 
nik ist in den entsprechenden COBOL-Handbichern beschrieben. Hier sind noch einmal 
kurz die für den DCAM-Anwender wichtigen Regeln erwähnt. 


Verwendung des COB1-Übersetzers 


Der Aufruf eines Unterprogramms verlangt folgende Anweisungen in der angegebenen 
Reihenfolge: 


ENTER LINKAGE. 
CALL literal USING datenname-1(,datenname-2...). 
ENTER COBOL. 


literal gibt die gewünschte DCAM-Funktion an (z.B. YOPEN). Der Name der 
DCAM-Funktion kann auch auf die ersten 4 Zeichen gekürzt werden 
(z.B. YSET statt YSETLOG). 


datenname Datenstruktur oder Übergabebereich, der dem aufgerufenen Unterpro- 
gramm zur Verfügung gestellt wird. 


Hinweis 
Die Reihenfolge von datenname-1[,datenname-2...] muß strikt eingehalten werden. 


Die einzelnen CALL-Aufrufe sind im Kapitel 3 ausführlich beschrieben. Eine kurze 
Übersicht bietet Anhang A.2. 


Beim COB1-Übersetzer kann auch die folgende einfachere Form verwendet werden: 


CALL literal USING datenname-1[,datenname-2...]. 
Die ENTER-Anweisungen sind demnach beim COB1 überflüssig. 


Ausführung der (Unterprogramm-) Aufrufe 
Allgemeines 


An einem Beispiel im Bild 2-2 wird die Ausführung der Aufrufe gezeigt. 

Wird ein DCAM-Modul aufgerufen, erfolgt eine Verzweigung innerhalb des Benutzerpro- 
gramms. Der DCAM-Modul wurde beim Binderlauf zu dem oder den Benutzermodul(en) 
dazugebunden. Der DCAM-Modul greift auf die übergebenen Datenfelder zu und findet 
dort im Falle des YSEND den Namen des Absenders, die Adresse des Empfängers, die zu 
sendende Nachricht und ihre Länge usw. Nunmehr übergibt dieser Modul die Nachricht an 
DCAM, indem er Makroaufrufe benutzt (siehe Manual 'DCAM Makroaufrufe'). Er trägt die 
Rückinformation in die Datenstruktur ein und springt zurück in den Modul des Benutzers 
zum nächsten Befehl nach dem CALL-Aufruf. 

Während der Verarbeitung im Systemmodul war der Benutzermodul im Wartezustand 
(synchrone Verarbeitung). Er wird durch den Rücksprung aus dem DCAM-Modul wieder. 
gestartet. | 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-Z75-3 2-35 


CALL-Aufrufe 


:: Benutzer-Prozef Svstem 


PROCEDURE DIVISON 


CALL VSEND USING X.Y Z. 


ARBEITUNG 


Ruckinformation 
Rucksprung 


VRECEIVE-BEARBEITUNG 


') gemeinsamer Speicherbereich 


Bild 2-2 Beispiel für Ausführung eines CALL-Aufrufs 
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CALL-Aufrufe 


© 2.3.2.2 Wartezeiten 


Bei YRECEIVE sowie YOPNCON können beträchtliche Wartezeiten entstehen, denn es muß 
auf die Nachricht oder die Verbindungs-Aufforderung bzw. Annahme des oder eines 
Partners gewartet werden. Deshalb hat der Benutzer 2 Möglichkeiten zur Wahl. 


e Er kann bei Abgabe dieser Aufrufe bestimmen, daß sie eine bestimmte Zeit warten 
sollen, bevor sie in jedem Fall beendet werden, auch wenn vom Partner nichts 
angekommen ist (siehe TOVAL und Q in BEF-NAME, Abschnitt 2.2.3). 


e Er kann aber auch verlangen, daß ein solcher Aufruf sofort beendet wird, selbst wenn 
vom Partner nichts vorliegt (siehe Q in BEF-NAME, Abschnitt 2.2.3). 
Der Aufruf wird sozusagen auf Verdacht abgesetzt. Ggf. muß er dann zu einem 
anderen Zeitpunkt wiederholt werden. Im Programmablauf entstehen so fast keine 
Wartezeiten. Lediglich der Aufwand für die wiederholte Abgabe des Aufrufs ist zu 
berücksichtigen. 


2.3.2.3 Ablauf bei asynchronen DCAM-Aufrufen 


Aufrufe, bei denen auf das Eintreffen eines Ereignisses gewartet werden muß, können 
auch asynchron ausgeführt werden. Dies bedeutet, daß 'SVN—NO' angegeben werden 

© muß. Wenn der Aufruf angenommen wurde (Returncode 0), kann ein YWAIT-Aufruf 
abgesetzt werden. 
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Erstmaliges Eröffnen einer mehrfach benutzbaren DCAM-Anwendung 


Eine mehrfach benutzbare DCAM-Anwendung soll durch den Primärprozeß eröffnet 
werden. 


Dazu muß angegeben werden: 


1) 
9) 


der Name der DCAM-Anwendung. 


daB diese Anwendung mehrfach benutzbar sein soll. 


Ferner kann angegeben werden: 


3) 


A) 


5) 


6) 


7) 
8) 


10) 


11) 


14) 


der Kettungsname, wenn mit der Namen-Zuweisung (LINK) gearbeitet werden soll 
(siehe Manual ‘DCAM Programmschnittstellen’, Abschnitt 3.4 und /APPL-Kommando 
im Anhang ል.6). 


daß die Einträge aus der CLT (Communication Link Table) dem Programm während 
des ganzen Programmlaufs (LINKMOD — 'PER') zur Verfügung stehen sollen. Bei 
fehlender Angabe sind sie nur wàhrend des Aufrufs verfugbar. 


das Kennwort, das bei Aufforderungen zum Verbindungsaufbau vom Partner 
angegeben werden muß. Fehlt diese Vorgabe, wird kein Kennwort verlangt. 


das Kennwort, das bei der Eröffnung durch einen Sekundärprozeß angegeben 
werden muß. Fehlt diese Vorgabe, wird kein Kennwort verlangt. Das Kennwort kann 
nur vorgegeben werden, wenn kein RDF-Kennwort vorhanden ist, oder es muß mit 
diesem identisch sein. 


das Kennwort, das bei der RDF-Generierung für diese Anwendung vorgegeben 
wurde. 


daß der eröffnende Prozeß der Primärprozeß sein will (PRIMARY). Bei gelöschtem 
Feld wird keine Prüfung durchgeführt (NO). 


daß Aufforderungen zum Verbindungsaufbau nicht bearbeitet werden sollen 
(LOGON="NO”: NLOGON). Standardwert ist LOGON="YES", gleichbedeutend mit: 
Aufforderungen sollen bearbeitet werden (LOGON). 


daß Transportquittungen an den anfordernden Prozeß geleitet werden sollen 
('REQ'— REQTASK) oder nicht der Anwendung übergeben werden sollen 
("NO”=NOTACK). Standardmäßig werden sie dem Primärprozeß (PRI'— PRIMTASK) 
übergeben. 


die Nummer der DCAM-Version, z.B. 0800, wenn die neuen Funktionen der DCAM 
V8.0 verwendet werden sollen (MAXLN-Angabe, asynchrone Verarbeitung, neue 
EDIT-OPTIONs, Verbindungsnachricht mit YOPNCON ACCEPT). 

Bei fehlender Angabe wird eine DCAM-Version < 7.0 angenommen. 


DCAM gibt zurück: 


2) 
12) 
13) 


den symbolischen Namen des eigenen Prozessors. 


den Rückgabecode. 


den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 
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VOPEN 


© CALL USING mg Versorgung der Felder 
Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel - 


02 LINK 
02 LINKMOD RR 
02 LOGPASS ey 
02 USEPASS SS 
02 USEPW 
02 VERIFV 

O2 ATTR. PRO 


03 LOGON 
Sri OSS PIC X(3). 
03 TACK PIC X(3). 


ሟ 
ርን 
E 
<= 


11 
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VOPEN 


3.1.1.3 


Erstmaliges Eröffnen - Verwendung von Verteilcodes 


Eine mehrfach benutzbare Anwendung soll durch den Primärprozeß eröffnet werden. Die 
Nachrichtenverteilung soll anhand von Verteilcodes erfolgen. 


Dazu muß angegeben werden: 


1) 
3) 


10) 
12) 


der Name der DCAM-Anwendung. 


der Verteilungsname, unter dem diesem ProzeB eine Verteilcode-Gruppe zugeordnet 
werden kann. 


daB diese Anwendung mehrfach benutzbar sein soll. 


daß die Nachrichtenverteilung über Verteilcodes erfolgen soll. 


Ferner kann angegeben werden: 


4) 


5) 


6) 


7) 


8) 


9) 


11) 


13) 


16) 


der Kettungsname, wenn mit der Namen-Zuweisung (LINK) gearbeitet werden soll 
(siehe Manual ‘DCAM Programmschnittstellen’, Abschnitt 3.4 und /APPL-Kommando 
im Anhang A.6). 


daß die Einträge aus der CLT (Communication Link Table) dem Programm während 
des ganzen Programmlaufs (LINKMOD="PER”) zur Verfügung stehen sollen. Bei 
fehlender Angabe sind sie nur während des Aufrufs verfügbar. 


das Kennwort, das bei Aufforderungen zum Verbindungsaufbau vom Partner 
angegeben werden muß. Fehlt diese Vorgabe, wird kein Kennwort verlangt. 


das Kennwort, das bei der Eröffnung durch einen Sekundärprozeß angegeben 
werden muß. Fehlt diese Vorgabe, wird kein Kennwort verlangt. Das Kennwort kann 
nur vorgegeben werden, wenn kein RDF-Kennwort vorhanden ist, oder es muß mit 
diesem identisch sein. 


das Kennwort, das bei der RDF-Generierung für diese Anwendung vorgegeben 
wurde. 


daß der eröffnende Prozeß der Primärprozeß sein will ('PRIMARV'). Bei gelöschtem 
Feld wird keine Prüfung durchgeführt ('NO'). 


daß Aufforderungen zum Verbindungsaufbau nicht bearbeitet werden sollen 
(LOGON ="NO” ` NLOGON). Standardwert ist LOGON="YES”, gleichbedeutend mit: 
Aufforderungen sollen bearbeitet werden (LOGON). 


daß Transportquittungen an den anfordernden Prozeß geleitet werden sollen 
('REQ'— REQTASK) oder überhaupt nicht der Anwendung übergeben werden sollen 
("NO”=NOTACK). Standardmäßig werden sie dem Primärprozeß ("PRI"=PRIMTASK) 
übergeben. 


die Nummer der DCAM-Version, z.B. 0800, wenn die neuen Funktionen der DCAM 
V8.0 verwendet werden sollen (MAXLN-Angabe, asynchrone Verarbeitung, neue 
EDIT-OPTIONs, Verbindungsnachricht mit YOPNCON ACCEPT). 

Bei fehlender Angabe wird eine DCAM-Version < 7.0 angenommen. 


DCAM gibt zurück: 


2) 
14) 
15) 


den symbolischen Namen des eigenen Prozessors. 
den Rückgabecode. 


den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 
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VOPEN 


Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


01 APP-NAME. PIC X(3). 


YOPEN 


verteilungsname = 
kettungsname 


"erer" = Dr 


03 LOGON PIC X(3) 
03 TACK PIC X(3). 


02 DISNAME PIC X(8). 


kennwort 2 
kennwort 3 
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{“REQ*|“NO“} 
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3.1.1.4 Nachfolgendes Eröffnen 


Eine bereits durch einen Primärprozeß eröffnete DCAM-Anwendung soll durch einen 
Sekundärprozeß (also nachfolgend) eröffnet werden. 


Dazu muß angegeben werden: 


1) 
7) 


der Name der DCAM-Anwendung. 


daß diese Anwendung mehrfach benutzbar ist. 


Ferner kann angegeben werden: 


3) 


4) 


5) 


6) 


10) 


der Kettungsname, wenn mit der Namen-Zuweisung (LINK) gearbeitet werden soll 
(siehe Manual 'DCAM Programmschnittstellen', Abschnitt 3.4 und /APPL-Kommando 
im Anhang A.6). 


daß die Einträge aus der CLT (Communication Link Table) dem Programm während 
des ganzen Programmlaufs (LINKMOD="PER”) zur Verfügung stehen sollen. Bei 
fehlender Angabe sind sie nur während des Aufrufs verfügbar. 


das Kennwort, das vom Primärprozeß für den Anschluß an die Anwendung 
vorgeschrieben worden ist oder das Kennwort, das bei der RDF-Generierung für 
diese Anwendung vorgegeben wurde. 


daß der eröffnende Prozeß ein Sekundärprozeß sein will (SECONDARY). Bei 
gelöschtem Feld wird keine Prüfung durchgeführt (NO). 


die Nummer der DCAM-Version, z.B. 0800, wenn die neuen Funktionen der DCAM 
V8.0 verwendet werden sollen (MAXLN-Angabe, asynchrone Verarbeitung, neue 
EDIT-OPTIONs, Verbindungsnachricht mit VOPNCON ACCEPT). 

Bei fehlender Angabe wird eine DCAM-Version < 7.0 angenommen. 


Hinweis 


Bei Folge YOPEN für eine Anwendung muß dieselbe DCAMVER angegeben sein wie 
beim 1. YOPEN. 


DCAM gibt zurück: 


2) 
8) 
9) 


den symbolischen Namen des eigenen Prozessors. 
den Rückgabecode. 


den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-Z75-3 


VOPEN 


Versorgung der Felder 


PICTURE- 
Klausel 


Muster für Stufennummern, 
Datensatz- und Datennamen 


DCAM 
gibt zurück 


N 
z 
oO 
= 
= 
ፎ 
2 
x 


AU (pil. 
al AU 


| ||| 8. 


02 LINKMOD 
02 USEPW 
02 VERIFV 


T 


rück 


DCAM 
gibt zu 


= version 


PIC 9(4) COMP-3) [ 10 | [ cam 


ዐ1 DCAMVER 
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3.1.1.5 


Nachfolgendes Eröffnen - Verwendung von Verteilcodes 


Eine bereits durch einen Primärprozeß eröffnete DCAM-Anwendung soll durch einen 
Sekundärprozeß (also nachfolgend) eröffnet werden. Die Nachrichtenverteilung erfolgt, 
wie im Primärprozeß festgelegt, anhand von Verteilcodes. 


Dazu muß angegeben werden: 


1) 
3) 


8) 


der Name der DCAM-Anwendung. 


der Verteilungsname, unter dem diesem ProzeB eine Verteilcode-Gruppe zugeordnet 
werden kann. 


daB diese Anwendung mehrfach benutzbar ist. 


Ferner kann angegeben werden: 


4) 


5) 


6) 


7) 


11) 


der Kettungsname, wenn mit der Namen-Zuweisung (LINK) gearbeitet werden soll 
(siehe Manual ‘DCAM Programmschnittstellen’, Abschnitt 3.4 und /APPL-Kommando 
im Anhang A.6). 


daß die Einträge aus der CLT (Communication Link Table) dem Programm während 
des ganzen Programmlaufs (LINKMOD — 'PER') zur Verfügung stehen sollen. Bei 
fehlender Angabe sind sie nur während des Aufrufs verfügbar. 


das Kennwort, das vom PrimàrprozeB für den Anschluß an die Anwendung 
vorgeschrieben worden ist oder das Kennwort, das bei der RDF-Generierung für 
diese Anwendung vorgegeben wurde. 


daß der eröffnende Prozeß ein Sekundärprozeß sein will (SECONDARY). Bei 
gelöschtem Feld wird keine Prüfung durchgeführt (NO). 


die Nummer der DCAM-Version, z.B. 0800, wenn die neuen Funktionen der DCAM 
V8.0 verwendet werden sollen (MAXLN-Angabe, asynchrone Verarbeitung, neue 
EDIT-OPTIONs, Verbindungsnachricht mit YOPNCON ACCEPT). 

Bei fehlender Angabe wird eine DCAM-Version < 7.0 angenommen. 


DCAM gibt zurück: 


2) 
9) 
10) 


den symbolischen Namen des eigenen Prozessors. 
den Rückgabecode. | 


den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang A.4). 
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CALL USING er Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


01 APP-NAME. PIC X(3). 


YOPEN 


02 LINK 


02 LINKMOD 
Ser: SGĦASS PIC X(4) 
Bese. SEPASS PIC X(4). 


PIC X(8). 
02 USEPW PIC X(4). 


02 VERIFY PIC X(3). 


IE PIC X(3) 
IS-DISGE EA. PIC X(3). 
FE ም ጋ ድ PIC X(3) 


L — — =ዝ 01 06ጳአክ/8 PIC 9(4) COMP-3 
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3.1.2 Verändern des Zustands einer DCAM-Anwendung 


Voraussetzung ist, daß diese DCAM-Anwendung Aufforderungen zum Verbindungsaufbau 
bearbeitet. Dazu muß bei ihrer Eröffnung (vgl. Abschnitt 3.1.1.1 bis 3) LOGON="YES” 
eingestellt worden sein. Danach ist sie im START-Zustand. 


Um den Zustand zu verändern, muß angegeben werden: 
1) der Name der DCAM-Anwendung bei APP-NAME. 
Ferner kann angegeben werden: 


2) daß der START-Zustand wiederhergestellt werden soll (STP—'NO'), falls vorher der 
STOP-Zustand eingestellt worden ist. Ist das Feld gelöscht, wird der STOP-Zustand 
eingestellt (STP—'VES': Standardwert). 


DCAM gibt zurück: 
3) den Rückgabecode. 


4) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang A Al. 
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CALL USING 


Muster für Stufennummern, 


PICTURE- 
Datensatz- und Datennamen Klausel 


YSETLOG 01 APP-NAME. Ka E 


OT BEF NAME “TREE 
ee | መኣ መዴፌ. 
ፌር መማ An en RE 

21 GE STP PIC Kee 


VSETLOG 


Beschrei- 
bung Versorgung der Felder 


| eee 
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3.1.3 Abfragen des Zustands einer DCAM-Anwendung 


Abgefragt werden kann der Zustand einer DCAM-Anwendung, die der Benutzer eroffnet 
hat, oder einer Anwendung, die im gleichen Verarbeitungsrechner eroffnet worden ist, die 
er aber nicht selbst eröffnet hat. Bedingung ist, daß er mindestens 1 DCAM-Anwendung 
selbst eröffnet hat. 


Dazu muß angegeben werden: 


1) daß der Zustand einer DCAM-Anwendung abgefragt werden soll, denn der Aufruf 
YINQUIRE wird auch für andere Abfragen benutzt (siehe 3.2.2). 


2) der Name der DCAM-Anwendung, deren Zustand abgefragt werden soll. 


5) die Länge des Bereichs, in den DCAM die Information eintragen soll. 


DCAM gibt zurück: 
3) den Rückgabecode. 


4) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 


6) eine Anzeige, die den Zustand der DCAM-Anwendung angibt (Eintragungen siehe 
folgende Tabelle). 


Anzeige | Bedeutung 


0 Die Anwendung ist eröffnet und verarbeitet Aufforderungen zum 
Verbindungsaufbau (LOGON und START). 


2 Die Anwendung ist eröffnet und verarbeitet momentan keine Auf- 
forderungen zum Verbindungsaufbau (LOGON und STOP). 


4 Die Anwendung ist eröffnet und verarbeitet keine Aufforderungen 
zum Verbindungsaufbau (NLOGON). 


6 Die Anwendung wurde noch nicht erzeugt (von einem Primärprozeß 
eröffnet), d.h. sie existiert nicht. 
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VINQUIRE 


Beschrei- 
CALL USING bung Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 
YINQUIRE 
TO- 0 0270 


g 

= 
-w 
5 


Wee ee Te rare 
01 ANW-BEREICH. Be EUs 


') Der CONN-NAME ist anzugeben,weil dieser Aufruf auch bei 
der Verbindungsfunktion eingesetzt ‘wird (siehe Abschnitt 3.2.2). 
Hier steht sie nur Kompatibilitätsgründen, ihr Inhalt wird 
nicht ausgewertet. 
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3.1.4 Schließen einer DCAM-Anwendung J 


YCLOSE durch einen Sekundärprozeß: 


e Die DCAM Anwendung wird ausschließlich für diesen Prozeß geschlossen. 


YCLOSE durch einen Primärprozeß: 


e Die DCAM-Anwendung wird aufgelöst, d.h. die DCAM-Anwendung wird für diesen 
Prozeß und für alle zu dieser Anwendung gehörigen Sekundärprozesse geschlossen. 


Alle in diesem Moment bestehenden Verbindungen werden abgebaut. 
Anstehende Anforderungen von DCAM-Funktionen werden aufgehoben. 


Angekommene, aber an den Prozeß noch nicht übergebene Daten gehen verloren. 


Die zu dieser Zeit in einer Warteschlange eingetragenen Aufforderungen zum 
Verbindungsaufbau werden von DCAM zurückgewiesen. 


Für die von diesem YCLOSE betroffenen Sekundärprozesse gilt: 


e Der nächste Aufruf, der mit dem Namen dieser Anwendung abgesetzt wird, wird mit J 
dem entsprechenden Fehlercode (siehe Anhang A.4) zurückgewiesen. 


Dazu muß angegeben werden: 


1) der Name der DCAM-Anwendung, die geschlossen werden soll. 


DCAM gibt zurück: 
2) den Rückgabecode. 


3) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang A.4). 


Beschrei- 


CALL USING bung Versorgung der Felder 


Muster für Stufennummern, 


PICTURE- 
Datensatz- und Datennamen Klausel 
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3.2 Auf eine Verbindung bezogene CALL-Aufrufe 


Bevor Kommunikationspartner Nachrichten übermitteln können, müssen sie eine Verbin- 
dung aufbauen. Einer der Partner fordert zum Verbindungsaufbau auf. Die Aufforderung 
wird dem anderen Partner durch das Kommunikationssystem übermittelt. 


Informationen über den auffordernden Partner kann er abfragen. Er kann die Aufforderung 


annehmen. 


Bestimmte Eigenschaften der Verbindung können für eine bestehende Verbindung wieder 


geändert werden. Die Verbindung kann von jedem der Partner jederzeit abgebaut werden. 


Die verbindungsbezogenen Aufrufe sind: 


In 


YOPNCON Aufbau einer Verbindung (auffordern/annehmen) bzw. Anschließen 
an eine vordefinierte Verbindung. 


YINQUIRE Abfragen von Informationen über die Verbindung und verbundene 
Partner. | 
YREJLOG Zurückweisen einer Aufforderung zum Verbindungsaufbau. 


YCHANGE Ändern von Eigenschaften einer Verbindung. 
YCLSCON Rücknahme einer Aufforderung bzw. Abbau einer Verbindung. 


mehrfach benutzbaren Anwendungen können diese Aufrufe - mit Ausnahme des 


YINQUIRE - nur vom Primärprozeß gegeben werden. 


3.2.1 Aufbau einer logischen Verbindung 


Zum Aufbau einer Verbindung kann 


aufgefordert werden. 
eine Aufforderung angenommen werden. 


Je nach dem Verfahren der Nachrichtenverteilung 


wird die Art der Warteschlange (absenderspezifisch oder empfängerglobal) 
oder die Zuordnung von Verteilcodes zur Verbindung festgelegt. 


Daraus resultieren 4 Varianten des Aufrufs YOPNCON. Die Verbindung, die aufgebaut 
werden soll, wird in der Verbindungsstruktur beschrieben. 
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3.2.1.1 


3-18 


Beschreibung der aufzubauenden Verbindung 


Im Abschnitt 2.2.4 wurde bereits die Verbindungsstruktur mit allen Feldern gezeigt. Hier 
werden die Felder herausgegriffen, die für den Aufbau einer Verbindung wichtig sind. 
Felder, deren Handhabung bei den einzelnen Aufrufen unterschiedlich ist (1); 2); 3)), 
werden jeweils dort beschrieben. 


Zur Beschreibung der Verbindung kann angegeben werden: 


4) 


5) 


11) 


6) 


7) 


8) 


der Kettungsname, wenn mit der Namen-Zuweisung (LINK) gearbeitet werden soll 
(siehe Manual ‘DCAM Programmschnittstellen’, Abschnitt 3.4 und /CONN-Komman- 
do im Anhang A.6). | 


daß die Einträge aus der CLT (Communication Link Table) dem Programm während 
des ganzen Programmlaufs (LINKMOD — 'PER') zur Verfügung stehen sollen. Bei 
fehlender Angabe sind sie nur während des Aufrufs verfügbar. 


daß die Nachrichtenaufbereitung nach Maßgabe der EDITIN- bzw. EDITOUT-Felder 
durchgeführt werden soll. 


Sollen logische Datenstationen benutzt werden, so ist diese Angabe Pflicht; 
andererseits ist sie nur sinnvoll, wenn der Kommunikationspartner eine Datenstation 
ist. 


Das Feld muß gelöscht sein, wenn der Partner eine DCAM-Anwendung ist. In diesem 
Fall wird 'USR'— USER eingestellt. 


entfällt 

(Ein Datenübermittlungsprotokoll des Systems zu benutzen ist hier schon vorgese- 
hen, wird aber derzeit noch nicht unterstützt. Der Benutzer kann ggf. selbst 
Festlegungen treffen, Standardwert 'USR'— USER). 


die Art der logischen Datenstation für den Empfang von Nachrichten: 


— “PHY” (=PHYS: keine logische Datenstation) bedeutet, daß die Nachricht so 
übermittelt wird, wie sie an der Datenstation abgesendet wurde. Sie 
enthält noch alle Steuerzeichen, die zur Steuerung der Gerätefunktio- 
nen erforderlich sind. Ein Nachrichtenkopf wird im Gerätecode (in der 
Regel ISO-7-bit) übergeben (siehe Benutzerhandbuch TRANSDATA 
810). Die Länge des Nachrichtenkopfes wird im Nachrichten-Beginn- 
Zeichen (NBZ) angezeigt oder ist für den Datenstationstyp festgelegt. 


— 'FOR' (=FORM: Format-Datenstation) bedeutet, daß die Formatsteuerung 
für Nachrichten verwendet wird. 


Fehlt die Angabe, wird 'LIN' (=LINE: Zeilen-Datenstation) eingestellt. 
die Behandlung von Nachrichten bei der Eingabe: 


— Rückwärtsschrittzeichen sollen nicht ausgewertet und übergeben werden (bei 
Zeilen- oder Format-Datenstation; wird nur ausgewertet bei Schreibstation 8103). 


— der Funktionstastencode wird als 1. Zeichen der Nachricht übergeben. 
— Kleinbuchstaben sollen übergeben werden (bei Zeilen-und Format-Datenstation). 


Werden keine Angaben gemacht, werden Rückwiärtsschrittzeichen ausgewertet 
und nicht übergeben ('NO'—NGETBS), wird der Funktionstastencode nicht 
übergeben ('NO'— NGETFC), und es werden Kleinbuchstaben in Großbuchstaben 
übersetzt ('NO'— NLCASE). 
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9) 


10) 


12) 


13) 


14] 


15) 


VOPNCON 


die Art der logischen Datenstation fur das Senden von Nachrichten: 


- “PHY” (=PHYS: keine logische Datenstation) bedeutet, daß der Benutzer die 
Nachricht mit den gerätespezifischen Steuerzeichen versehen wird. Ist 
ein Nachrichtenkopf erforderlich (siehe Benutzerhandbuch TRANSDA- 
TA 810), muß dieser im Gerätecode davor gesetzt werden. Das 1. 
Zeichen muß das Kopflängenbyte sein, das die Länge des Nachrich- 
tenkopfes angibt; es muß immer angegeben werden (ggf. mit Länge 1) 
(siehe Manual 'DCAM Programmschnittstellen', Abschnitt 3.3.1). 


— 'FOR' (=FORM: Format-Datenstation) bedeutet, daß die Formatsteuerung 
für Nachrichten verwendet wird. 


Fehlt die Angabe, wird 'LIN' (=LINE: Zeilen-Datenstation) eingestellt. 
die Behandlung der an das System zum Senden übergebenen Nachrichten: 


— Bei TRANSF — "UN oder “PHY” und bei Datensichtstationen 8151, 8152, 816x und 
975x: Die Nachrichten sollen auch auf einen angeschlossenen Drucker (HCOPY) 
ausgegeben werden. Fehlt die Angabe, werden sie nicht zusätzlich auf dem 
Drucker ausgegeben ('NO'—NHCOPV). Voraussetzung ist, daß ein solcher 
Drucker vorhanden ist. Dies ist ggf. mit YINQUIRE (Abschnitt 3.2.2.2) vorher 
abzufragen. 


— Bei TRANSF="LIN”: die Nachricht soll unstrukturiert ausgegeben werden, d.h. 
die gesamte Nachricht ist eine Struktureinheit. Bei Datensichtstationen 816x 
beispielsweise entspricht das der Einstellung 'Feld' — Nachricht. Fehlt die Angabe, 
wird jede logische Zeile einer Nachricht als Struktureinheit behandelt 
(NO'—NHOM). 


daß bei zu langen Nachrichten der Nachrichtenrest fur einen weiteren YRECEIVE 
aufgehoben wird ('NO'—KEEP). Voraussetzung ist, daß für die Verbindung der 
CS-Zustand eingestellt wird (bei BEF-NAME, jedoch nur, wenn keine Verteilcode- 
Verwendung). Fehlt die Angabe, werden die Nachrichtenreste weggeworfen 
('VES'—TRUNC). Die Einstellung in der Verbindungsstruktur gilt nur, wenn in der 
Befehlsstruktur bei YRECEIVE für TRUNC nichts abweichendes eingestellt wird (siehe 
3.48). 


daß die Nachrichten transparent übertragen und als Bitmuster (BINARY), ohne 
Übersetzung, übergeben werden sollen, falls bei 11) der Standardwert eingestellt 
wird ('USR'—USER). Wird nichts angegeben, werden die Nachrichten jeweils 
übersetzt ('VES'— SVSCODE), d.h. im EBCDIC erwartet oder übergeben. 


daß die Datenübermittlung von dieser Anwendung begonnen wird (APPSTART). 
Ohne Angabe wird nichts festgelegt ('NO'— ANVSTART). 


die maximale Nachrichtenlänge, die eine Anwendung auf dieser Verbindung senden 
will. Sie muß angegeben werden, wenn die neuen Funktionen der DCAM V8.0 
genutzt werden sollen. 
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3.2.1.2 


Auffordern zum Aufbau 


Zum Aufbau einer Verbindung wird mit dem Aufruf VOPNCON aufgefordert. Die hier 
beschriebene Variante gilt, wenn ohne Verteilcodes gearbeitet wird. Vorausgesetzt wird, 
daß bei der Eröffnung der DCAM-Anwendung bei APP-NAME die Attribute NSHARE 
(Abschnitt 3.1.1.1) oder SHARE mit NDISCO (SHARE — 'VES' und DISCO — 'NO', Abschnitt 
3.1.1.2) eingestellt worden sind. 


Dazu muB angegeben werden: 


1) der Name der DCAM-Anwendung bei APP-NAME, die Absender der Aufforderung 
ist. 


2) die Adresse des Kommunikationspartners in der Verbindungsstruktur, bestehend aus 
dem Partnernamen und dem Namen des Prozessors, an dem der Partner 
angeschlossen ist. 


9) daß die Aufforderung an einen bestimmten Partner gerichtet wird. 


7) die maximale Nachrichtenlänge, die eine Anwendung auf dieser Verbindung senden 
will, wenn die neuen Funktionen der DCAM V8.0 genutzt werden sollen 
(DCAMVER = '0800)). 


11) daß eine Aufforderung ausgegeben werden soll. 
Ferner kann angegeben werden: 
3) das Kennwort zum Verbindungsaufbau, falls es vom Partner verlangt wird. 


10) daß die absenderspezifische Warteschlange eingestellt werden soll. Wird nichts 
angegeben, wird die empfängerglobale Warteschlange eingestellt (CA-Zustand). 


Zusätzlich kann eine Verbindungsnachricht übermittelt werden: 


In diesem Fall muß der Name einer Verteilungsstruktur angegeben werden, auch wenn die 
Nachrichtenverteilung nicht über Verteilcodes erfolgt. 


Ferner wird angegeben: 


14) die Länge n der Verbindungsnachricht, die zwischen 1 und 80 Zeichen umfassen 
darf. 


15) der Text der Verbindungsnachricht. Er steht in einem Feld, das mindestens so groß 
wie die in 14) angegebene Länge sein muß. 


16) die Länge n des Datenfeldes, in das die Verbindungsnachricht gesendet werden soll. 
Sie darf zwischen 1 und 80 Zeichen umfassen. 


17) der Text der Verbindungsnachricht. Er steht in einem Feld, das mindestens so groß 
wie die in 16) angegebene Länge sein muß. 


DCAM gibt zurück, was der Partner bei der Annahme der Aufforderung festgelegt hat: 
4) Art des Datenübermittlungsprotokolls. 
5) Art der Nachrichtenaufbereitung. 
6) Beginn der Datenübermittlung. 


7) Maximale Länge der auf dieser Verbindung zu übermittelnden Nachrichten 
(maximale Paketlänge, siehe Manual "Generierung eines Datenkommunikationssv- 
stems') oder Systemkonstante, wenn der Partner im gleichen Verarbeitungsrechner 
angeschlossen ist). 


8) siehe Anhang ል.5. 
Ferner: 
12) den Rückgabecode. 


13) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte. In diesem Fall fehlen die Rückgaben 4) bis 7). 
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Versorgung der Felder 


Aufrufe siehe 


entsprechende 
Abschnitte, ') 


Muster für Stufennummern, 
Datensatz- und Datennamen 


01 CONN-NAME: 


PICTURE- 
Klausel 


02 PASSWORD 


02 DEPROT 


02 PROC. 


03 APPSTART 


') siehe Beschreibung der einzelnen Aufrufe (Abschnitte 3.2.1 SÉ 
3.2.1.3, 3.2.4, 3.2.5, 3.2.6, 3.3.1 und 3.3.2) 

2) siehe Beschreibung der einzelnen Aufrufe 
(Abschnitte 3.2.1.2, 3.2.1 8) 


VOPNCON 


Beschrei- 
CALL USING ET Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


መ 


02 PASSWORD PIC X(4). 
A a A OE EE. 
weitere Eintragungen siehe Abschnitt 3.2.1.1 


BEDE B ም ይመን 
02 DEPROT PIC X(3). EN 


01 CONN-NAME. 


03 APPSTART PIC X(3). "e | [EYES No" 
02 MAXLN PIC 9(4) COMP. O 
02 PTNCHAR, ERSTEN 


Die ersten 4 
Felder 

der Partner- 
charakteristika 


PIC 9(4) COMP. 
PIC 9(4) COMP. 


SEINE PIC 9(4) COMP 


| 12 | | riickkehrcode — 
fehlercode 


d, 
al P 
0 


01 BEREICH 1 REN 
02 LAENGE 1 PIC 9(4) COMP. 
02 TEXT 1 PIC X(..). 


02 LAENGE 2 PIC 9(4) COMP. 
02 TEXT2 PIC X(..). 
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VOPNCON 


3.2.1.3 


Annahme einer Aufforderung 


Eine Aufforderung zum Aufbau einer Verbindung braucht nur dann angenommen zu 
werden, wenn die Anwendung Aufforderungen bearbeitet (Attribut LOGON beim Eröffnen 
der Anwendung und START-Zustand). Die in diesem Abschnitt dargestellte Variante des 
YOPNCON setzt zudem voraus, daß die Anwendung entweder mit dem Attribut NSHARE 
(3.1.1.1) oder den Attributen SHARE und NDISCO (SHARE="YES” und DISCO="NO”, 
Abschnitt 3.1.1.2) eröffnet wurde. 


In den adressierten Datenstrukturen werden unterschiedliche Felder versorgt, je nachdem, 
ob die Aufforderung eines bestimmten oder eines beliebigen Partners angenommen 
werden soll. 


Von einem beliebigen Partner 
Dazu muß angegeben werden: 

1) der Name der DCAM-Anwendung, die eine Aufforderung annimmt. 
Ferner kann angegeben werden: 


6) daß die absenderspezifische Warteschlange eingestellt werden soll. Wird nichts 
angegeben, wird die empfängerglobale Warteschlange (CA-Zustand) eingestellt. 


7) በ86 der Aufruf, falls er nicht sofort ausgeführt werden kann, weil keine Aufforderung 
vorliegt, in eine Warteschlange eingetragen werden soll. Fehlt die Angabe, wird er in 
jedem Fall sofort beendet und muß ggf. später wiederholt werden. 


5) die Lebensdauer dieses Aufrufs, falls er in eine Warteschlange eingetragen werden 
soll. Sie beträgt mindestens 1 Sekunde und höchstens 32767 Sekunden. 


Zusätzlich kann eine Verbindungsnachricht übermittelt werden: 


In diesem Fall muß der Name einer Verteilungsstruktur angegeben werden, auch wenn die 
Nachrichtenverteilung nicht über Verteilcodes erfolgt. 


Ferner wird angegeben: 


10) die Länge n der Verbindungsnachricht, die zwischen 1 und 80 Zeichen umfassen 
darf. 


11) der Text der Verbindungsnachricht. Er steht in einem Feld, das mindestens so groß 
wie die in 10) angegebene Länge sein muß. 


DCAM gibt zurück: 


2) die Adresse des Kommunikationspartners, bestehend aus Partner- und Prozessorna- 
men. 


3) die maximale Länge der auf dieser Verbindung zu übermittelnden Nachrichten 
(maximale Paketlänge, siehe Manual "Generierung eines Datenkommunikationssy- 
stems’ oder Systemkonstante, wenn der Partner im selben Verarbeitungsrechner 
angeschlossen ist). 


4) siehe Anhang A.5. 
Ferner: 
8) den Rückgabecode. 


9) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang A.4). In diesem Fall fehlen die Rückgaben 2) bis 
4). 
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VOPNCON 


© CALL USING “መ= ao Versorgung der Felder 
Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 
YOPNCON 01 APP-NAME. Br አረ A 


01 CONN-NAME. 


መሚ H Eintragungen des Benutzers 
mm pn siehe Abschnitt 3.2.1.1 


PIC 9(4) COMP. 
PIC 9(4) COMP. 


PIC X(3). 
PIC X(3). 


02 LAENGE 1 ‘PIC 9(4) COMP. 
02 TEXT 1 PIC X(..). 
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VOPNCON 


Von einem bestimmten Partner 


Dazu muB angegeben werden: 


1) 
2) 


6) 


der Name der DCAM-Anwendung, die eine Aufforderung annimmt. 


die Adresse des Kommunikationspartners, bestehend aus seinem Namen und dem 
Prozessornamen. 


daß die Aufforderung eines bestimmten Partners angenommen werden soll. 


Ferner kann angegeben werden: 


7) 


8) 


5) 


daß die absenderspezifische Warteschlange eingestellt werden soll (CS-Zustand der 
Verbindung). Wird nichts angegeben, wird die empfängerglobale Warteschlange 
(CA-Zustand) eingestellt. Diese Angabe entfällt bei Verteilcode-Verwendung. 


daß der Aufruf - falls er nicht sofort ausgeführt werden kann, weil keine 
Aufforderung vorliegt - in eine Warteschlange eingetragen werden soll. Fehlt die 
Angabe, wird er in jedem Fall sofort beendet und muß ggf. später wiederholt 
werden. 


die Wartezeit dieses Aufrufs, falls er in eine Warteschlange eingetragen werden soll. 
Sie beträgt mindestens 1 Sekunde und höchstens 32767 Sekunden. Standardwert ist 
600 Sekunden. 


Zusätzlich kann eine Verbindungsnachricht übermittelt werden: 


In diesem Fall muß der Name einer Verteilungsstruktur angegeben werden, auch wenn die 
Nachrichtenverteilung nicht über Verteilcodes erfolgt. 


Ferner wird angegeben: 


11) 


12) 


die Länge n der Verbindungsnachricht, die zwischen 1 und 80 Zeichen umfassen 
darf. 


der Text der Verbindungsnachricht. Er steht in einem Feld, das mindestens so groß 
wie die in 11) angegebene Länge sein muß. 


DCAM gibt zurück: 


3) die maximale Länge der auf dieser Verbindung sendbaren Nachrichten (maximale 
Paketlänge, siehe Manual "Generierung eines Datenkommunikationssystems’ oder 
Systemkonstante, wenn der Partner im selben Verarbeitungsrechner angeschlossen 
ist). 

4) siehe Anhang ል.5. 

Ferner: 

9) den Rückgabecode. 

10) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 


konnte (Eintragungen siehe Anhang A.4). In diesem Fall fehlen die Rückgaben 3) und 
4). 
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VOPNCON 


Beschrei- 
CALL USING bung Versorgung der Felder 
Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 
YOPNCON 01 APP-NAME. a ee 


weitere Eintragungen siehe Abschnitt 3.2.1.1 


01 CONN-NAME. 


ee Am 


01 BEF-NAME. 
02 TOVAL 


02 OPTCD. 
03 CS PIC X(3). : 


PIC X(3). 


PIC 9(4) COMP. 
PIC 9(4) COMP. 


n (1<u<32767) 


Hit lil 


01 BEREICH 1 ae 
— — መመላ 02 LAENGE 1 PIC 9(4) COMP. 
02 TEXT 1 PIC X(..). 
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VOPNCON 


3.2.1.4 Aufbau einer Verbindung - Verwendung von Verteilcodes 


Die DCAM-Anwendung muß mit den Attributen SHARE und DISCO eröffnet worden sein 
(SHARE="YES” und DISCO="YES”, siehe Abschnitte 3.1.1.3 und 5). Hier werden für 
Aufforderung oder Annahme nur noch die Teile des Aufrufs gezeigt, die für die 
Verteilcode-Verwendung anzugeben sind. Zu beachten ist, daß die Eintragung im Feld CS 
nicht ausgewertet wird, in diesem Zusammenhang demnach entfallen kann. 


In der Verteilungsstruktur muß angegeben werden: 


1) 


der svmbolische Name der Verteilungsstruktur. 


2) die Länge der auf dieser Verbindung verwendeten Verteilcodes, mindestens 1 
Zeichen, höchstens 8 Zeichen. 

3) die Position des Verteilcodes in der Nachricht, (0 bedeutet ab ersten Zeichen; 255 ist 
der Maximalwert). 

4) ob mit implizitem Verteilcode gearbeitet werden soll. 
— Wenn ja, muß ein Codeanzeiger-Zeichen definiert werden. 
— Wenn nein, muß das Feld mit LOW-VALUE besetzt werden. 

6) die Anzahl der angeschlossenen Verteilcode-Gruppen, mindestens 1 Gruppe, 
höchstens 8 Gruppen. 

6) der symbolische Name der Verteilcode-Gruppe(n). 

7) die Menge der Codes, die in einer Gruppe enthalten sind, mindestens 1, höchstens 8. 

8) die Codes, wie sie vom Kommunikationspartner erwartet werden. 

Hinweis 


Nur Verteilcode-Werte können während der Lebensdauer einer Verbindung verändert 
werden. Zum Ändern dient der Aufruf YCHANGE (Abschnitt 3.2.4). Die Eintragungen in 
7) und 8) werden nur ausgewertet, wenn diese Struktur nicht bereits für einen anderen 
YOPNCON oder YPERMIT (siehe 3.3.5.1) benutzt wurde. 
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VOPNCON 


CALL USING bung Versorgung der Felder 


(EEN ENEE A 


') siehe Abschnitte 3.2.1.1 bis 3 
2) siehe Abschnitt 3.2.1.2 
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VOPNCON 


3.2.1.5 


Anschließen an eine vordefinierte Verbindung 


Dieser Aufruf ist eine Variante der Aufrufe, die in 3.2.1.2 (ohne Verteilcode) und 3.2.1.4 
(mit Verteilcode) beschrieben wurden. 


Dazu muß angegeben werden: 
1) der Name der DCAM-Anwendung bei APP-NAME, die sich anschließen will. 


2) die Adresse des Kommunikationspartners in der Verbindungsstruktur, bestehend aus 
dem Partnernamen und dem Namen des Prozessors, an dem der Partner 
angeschlossen ist. 


9) daß ein bestimmter Partner gemeint ist. 
11) daß an eine vordefinierte Verbindung angeschlossen werden soll. 
Ferner kann angegeben werden: 


10) daß die absenderspezifische Warteschlange eingestellt werden soll. Wird nichts 
angegeben, wird die empfängerglobale Warteschlange eingestellt (CA-Zustand). 


DCAM gibt zurück, was bei der Generierung der Verbindung festgelegt wurde: 
4) Art des Datenübermittlungsprotokolls. 
5) Art der Nachrichtenaufbereitung. 
6) Beginn der Datenübermittlung. 


7) maximale Länge der auf dieser Verbindung zu übermittelnden Nachrichten 
(maximale Paketlänge, siehe Manual 'Generierung eines Datenkommunikationssv- 
stems' oder Systemkonstante, wenn der Partner im selben Verarbeitungsrechner 
angeschlossen ist). 


8) siehe Anhang ል.5. 
Ferner: 
12) den Rückgabecode. 


13) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang A Al. In diesem Fall fehlen die Rückgaben 4) bis 
7). 


Bei Verarbeitung mit Verteilcodes gilt zusätzlich das im Abschnitt 3.2.1.4 Beschriebene. 
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VOPNCON 


Beschrei- 
CALL USING bung Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


YOPNCON 


en er ee 
02 DEPROT PIC X(3). EN 
03 APPSTART — PIC X(3). | [ 6 J YEST NO") 
02 MAXLN | PIC 9(4) COMP. i JA 


02 PTNCHAR) 
03 PTNTYPE Picaa COMP. 


01 CONN-NAME. 


Die ersten 4 
Felder 

der Partner- 
charakteristika 


PIC XO) 


eee Set A 255 
03 FDBK TE 

04 RCD PIC 9(4) COMP. 

PIC 9(4) COMP. 


PIC 9(4) COMP 


ruckkehrcode 
fehlercode 


KAT 


~ e ዳክ 28 98. 


mm mm Em — — = — — — — 
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VINQUIRE 


3.2.2 


3.2.2.1 


Abfrage der Einträge über Partner und Verbindungen 


Beim Aufbau einer Verbindung und auch später gibt es unterschiedliche Gründe, über 
einen Partner oder eine Verbindung Informationen abzufragen: 


Der 1. Eintrag einer ggf. vorhandenen Warteschlange von Aufforderungen soll vor dem 
Verbindungsaufbau geprüft werden (TOPLOGON). 


Die Charakeristika (siehe Anhang ል.5) eines Partners sollen ausgewertet werden 
(PTNCHAR). 


Die Anzahl der verbundenen und zu einer Verbindung auffordernden Partner wird 
benċtigt (COUNTPTN). 


Diese unterschiedlichen Abfragen werden mit 3 Varianten des Aufrufs YINQUIRE 
durchgeführt. 


Partnerinformation vor dem Verbindungsaufbau 


Dazu muß angegeben werden: 


1) 
2) 
6) 
10) 


die Funktion des Aufrufs. 
der Name der DCAM-Anwendung. 
die Länge des Bereichs, in dem DCAM die Rückgaben eintragen soll. 


die Länge der erwarteten Verbindungsnachricht (höchstens 80 Bytes). 


DCAM gibt zurück: 


3) 
4) 


5) 


7) 
8) 
9) 


den Ruckgabecode. 


den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgefuhrt werden 
konnte (Eintragungen siehe Anhang A.4). In diesem Fall entfallen weitere Ruckgaben. 


die Adresse des zur Verbindung auffordernden Partners, bestehend aus Partner- und 
Prozessornamen. 


siehe Anhang A.5. 
die vom Partner vorgeschlagene Art der Nachrichtenaufbereitung. 


der vom Partner vorgeschlagene Beginn der Datenubermittlung. 


Ferner, falls vom Partner gesendet: 


11) 
12) 


die tatsächliche Länge der übermittelten Verbindungsnachricht und 


die Nachricht selbst. 
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VINQUIRE 


Beschrei- 
© CALL USING bung Versorgung der Felder 


Muster für Stufennummern 
Datensatz- und Datennamen 


AU 
DO 
= 
— 
ሼር 
ሙግ) 
m 


mm 


ዐ1 APP-NAME. 


O1-CONN-NAME. 


02 PTNCHAR. 
03 PTNTYPE 
03 DEVTVPE 
03 CHARSET 
03 DEVSEC 

02 PEDIT 

02 PPROC 


EO 

PIC XG) 

01 TOPL-BEREICH. eae 

o O3PTNTYPE | PIC 9(4) COMP. 
Die ersten 4 

[O38 DEVTYPE | PIC 9(4) COMP. Felder der 

[09 cuarser ን - [865)95:|| 7 | Parnercha 
rakteristika 

Tos Devs - | PIG 4) COMP 

oot E 271 f'USR'T'SVS') 

PIXO) Geet 

. 01 LGMSG-BEREICH. | — | 

mm ge tatsächliche 
ዬ Länge 

verbindungs- 
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VINQUIRE 


3.2.2.2 Partnercharakteristika 


Dazu muB angegeben werden: 
1) die Funktion des Aufrufs. 
2) der Name der DCAM-Anwendung. 


5) die Adresse des Kommunikationspartners, dessen charakteristische Merkmale 
abgefragt werden sollen, bestehend aus dem Partner- und Prozessornamen. 


6) die Länge des Bereichs, in den DCAM die Rückgaben eintragen soll. 


DCAM gibt zurück: 
3) den Rückgabecode. 


4) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang A.4). In diesem Fall entfallen weitere Rückgaben. 


7) die charakteristischen Merkmale des Partners (Inhalte siehe Anhang A.5). 
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VINQUIRE 


CALL USING Deg TE Versorgung der Felder 
ung 
Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 
YROURE mem 


01 APP-NAME. DREES 


Ce S anson Hise ሽን ፒ።መመጮ ጻ 
| OZFDBKSVNCHRONIZED. | ሌኒ ቲፒ 
—-——85,:— 


SO a 
01 PTN-BEREICH. 


02 PTNCHAR 1. 60: ae 


PIC 9(4) COMP. 
Die ersten 4 
| PIC 9(4) COMP. | 9(4) COMP. Ke E 
artnercha- 
PIC 9(4) COMP. Gids 
PIC ፀ(4) COMP. | 
PIC 9(4) COMP. Physikalische 
PIC 9(4) COMP. Geräteeigen- 
—  QAMAXIMALPUFFER-P. | PIC 9(4) COMP. Lager 
03 UNE-EIGENSCHAFT. E - | 
04 ZEILENLAENGE-L PIC 9(4) COMP. በለ. 
04 ZEILENANZAHL-L PIC 9(4) COMP. der Zeilen- 
TI 04MAXIMALPUFFER-L | PIC 9(4) COMP. Grengen 
03 EDITIN PIC 9(4) COMP. | Fähigkeit und 


Einstellung der 


03 EDITOUT — PIC 9(4) COMP. Den. 


aufbereitung 
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VINQUIRE 


3.2.2.3 Partneranzahl 


Dazu muß angegeben werden: 
1) die Funktion des Aufrufs. 
2) der Name der DCAM-Anwendung. 
5) die Länge des Bereichs, in den DCAM die Rückgaben eintragen soll. 


DCAM gibt zurück: 
3) den Rückgabecode. 


4) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang A.4). In diesem Fall entfallen weitere Rückgaben. 


6) die Anzahl der derzeit mit dieser Anwendung verbundenen Partner. 


7) die Anzahl der Aufforderungen zum Aufbau einer Verbindung, die momentan auf 
eine Annahme durch diese Anwendung warten. 


Beschrei- 
CALL USING አህ = Versorgung der Felder: 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


YINQUIRE 


መ Gee ea 
01 CNT-BEREICH. ie ae 


—————— ee l-i ee /DC AN 


') die Verbindungsstruktur ist aus Kompatibilitätsgründen notwendig; 
Eintragungen werden nicht ausgewertet. 
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VREJLOG 


© 3.2.3 Zurückweisen einer Aufforderung zum Verbindungsaufbau 


Dazu muß angegeben werden: 
1) der Name der DCAM-Anwendung. 


4) der Partner- und Prozessorname. 


Hinweis 


YREJLOG muß in COBOL zusammen mit YINQUIRE verwendet werden. Ein YINQUIRE 
(TOP) schreibt den Partner- und Prozessornamen in die Felder PTNNAME und 
PRONAME und ist daher immer vorher anzugeben. 


DCAM gibt zurück: 
2) den Rückgabecode. 


3) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte. 


CALL USING Beschreibung Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


01 APP-NAME. ee 


ክ ፦ PIC 9 (4) COME. 


FS SN PIC 9 (4) COMP 


01 CONN-NAME. ኣዛ መ 
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3.2.4 


Ändern der Eigenschaften einer Verbindung 


Dazu muß angegeben werden: 
1) der Name der DCAM-Anwendung. 


4) die Adresse des Kommunikationspartners, dessen Verbindungseigenschaften geän- 
dert werden sollen, bestehend aus dem Partner- und Prozessornamen. 


Alle weiteren Funktionen (Eingabe-, Ausgabe- und Proc-Funktionen) in der V-Struktur 
werden von DCAM ausgewertet. Die Angaben sind wahlweise in dem Sinne, daß sie 
wahlweise neu gesetzt und damit geändert werden können. Die Beschreibung der Felder 
ist hier kurz gefaßt, da die Beschreibung der Verbindung im Abschnitt 3.2.1.1 ausführlich 
erfolgt ist. 


Geändert werden kann: 


D PER" Die Einträge der CLT (communication link table) stehen dem 
Programm während des ganzen Programmlaufs zur Verfügung. 


6) die Nachrichtenaufbereitung bei der Eingabe in 
"PH Aufbereitung durch den Benutzer oder 
“FOR” Verwendung der Formatsteuerung. 
Bei leerem Feld wird “LIN” eingestellt (Verwendung der Zeilen-Datenstation). 
ZE "YES" Übergabe von Rückwärtsschritt-Zeichen. 
Bei leerem Feld wird Behandlung der Zeichen verlangt. 
8) die Behandlung des logischen Funktionstastencodes einer Datenstation: 
“VES: Der Funktionstastencode wird als 1. Zeichen der Nachricht übergeben. 
Bei leerem Feld wird der Funktionstastencode nicht übergeben ("NO” = NGETFC). 
2) ተድ Kleinbuchstaben sollen übergeben werden. 
Bei leerem Feld werden Klein- in Großbuchstaben umgesetzt. 
10) die Nachrichtenaufbereitung bei der Ausgabe in 
“PHY” Aufbereitung durch den Benutzer oder 
FOR Verwendung der Formatsteuerung. 
Bei leerem Feld wird 'LIN' eingestellt (Verwendung der Zeilen-Datenstation). 


11]. 155 Die Nachricht soll gleichzeitig auf dem angeschlossenen Drucker 
ausgegeben werden (bei Datensichtstationen). Bei leerem Feld 
unterbleibt die Druckausgabe. 


12) Die Strukturierung der Ausgabe: 
"YVES. Die Nachricht soll unstrukturiert ausgegeben werden. 
Bei leerem Feld wird sie strukturiert ausgegeben ('NO'— NHOM). 


Die Änderungen von 5) bis 11) sind allerdings nur möglich, wenn beim Aufbau der 
Verbindung Nachrichtenaufbereitung durch das System verlangt wurde (EDIT=SYSTEM). 


Ferner kann geändert werden: 
13) Die Behandlung zu langer Nachrichten in 


'NO' Die Überlänge wird angezeigt und für einen weiteren YRECEIVE 
aufgehoben. 


Bei leerem Feld wird die Überlänge abgeschnitten und weggeworfen. 
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VCHANGE 


© CALL USING ge Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 
YCHANGE 01 APP-NAME. Lda ae 


ሙዝ PIC 9(4) COMP. 


| በር ር  T 
d 
| 

ዬ | 
| 
| 
| 
, 
| O3 LCASE 
| 02 EDITOUT. Ange olad 
| 03 TRANSF PIC X(3). (“ዞዛሃ!ዞዕክ“) 
| SE 
, 03 HOM 
| 02 EDIT 
| 02 PROC Er 
| 03 TRUNC 
| 03 SVSCODE 

- መ 01 VTLG-NAME KAPA 
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YCHANGE 


14) die Codeübersetzung: 
'NO' Binärmuster werden übergeben. 


Bei leerem Feld wird die Übersetzung in EBCDIC verlangt (nur sinnvoll, wenn bei 
VOPNCON EDIT="USR” eingestellt wurde). 


Bei Nachrichtenverteilung anhand von Verteilcodes können einige Werte in der 
Verteilungsstruktur geändert werden: 


Dazu muß angegeben werden: 


15) der symbolische Name der Verteilungsstruktur, wie er bei YOPNCON angegeben 
wurde. 


Geändert werden kann: 
16) die Anzahl der angeschlossenen Verteilcode-Gruppen. 


17) der symbolische Name der Verteilcode-Gruppe(n). Beachtet werden muß, daß der 
symbolische Name der Verteilcode-Gruppe(n) eindeutig ist. Sollte von einer anderen 
Verbindung die gleiche Verteilungsstruktur beim YOPNCON benutzt worden sein, 
muß bei Änderungen des Inhalts ein neuer Name gewählt werden. 


18) die Menge von Verteilcodes in der Codegruppe. 


19) die Verteilcodes selbst. 


DCAM gibt zurück: 
2) den Rückgabecode. 


3) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang A.4). 
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3.2.5 


3.2.6 


CALL 


YCLSCON 


Rücknahme einer Aufforderung 


Um eine Aufforderung zum Verbindungsaufbau zurücknehmen zu können, darf sie nicht 
bereits vom Partner angenommen worden sein. 


Dazu muß angegeben werden: 
1) der Name der DCAM-Anwendung. 


4) die Adresse des Kommunikationspartners, bestehend aus dem Partner- und dem 
Prozessornamen. 


DCAM gibt zurück: 
2) den Rückgabecode. 


3) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 


Abbau einer Verbindung 


Wurde eine Verbindung durch Aufforderung und Annahme aufgebaut, kann sie mit dem 
Aufruf YCLSCON wieder abgebaut werden. Noch nicht abgeholte Daten werden dabei 
gelöscht. Angaben und Rückgaben sind die gleichen wie bei der Rücknahme einer 
Aufforderung (voriger Abschnitt). 


Beschrei- 
USING bung Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 
01 APP-NAME RE 
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VSEND 


3.3 


3.3.1 


Auf die Datenibermittlung bezogene CALL-Aufrufe 


Nach erfolgtem Verbindungsaufbau können Kommunikationspartner Daten übermitteln. 

Ein Sende- bzw. Empfangsaufruf bedeutet immer Übernahme der Daten aus dem 
Benutzerbereich in den Datenspeicher des Kommunikationssystems bzw. umgekehrt. So 
wird beispielsweise ein Sendeaufruf in dem Moment erfolgreich beendet, in dem die zu 
sendenden Daten in den Datenspeicher des Kommunikationssystems übertragen worden 
sind. Zur Datenübermittlungsfunktion gehören auch Steuerfunktionen für die Verteilcode- 
Zuordnung. 


Folgende Aufrufe stehen zur Verfügung: 


YSEND Senden einer Nachricht. 

YRECEIVE Empfangen einer Nachricht oder Transportquittung. 

YRESET Ändern des CS/CA-Zustands einer Verbindung. 

YPERMIT Einem Prozeß der Prozeßgruppe den Empfang von Nachrichten mit 


bestimmten Verteilcodes ermöglichen. 


YFORBID Einem Prozeß der Prozeßgruppe den Empfang von Nachrichten mit 


bestimmten Verteilcodes verbieten. 


Die beiden Aufrufe zur Verteilcode-Steuerung können nur von einem Primärprozeß 
gegeben werden. 


Senden einer Nachricht 


Dazu muß angegeben werden: 


1) 
2) 


12) 


13) 


der Name der DCAM-Anwendung. 


die Adresse des Kommunikationspartners, bestehend aus Partner- und Prozessorna- 
men. 


die Länge der im Sendebereich stehenden Nachricht. ExpreBnachrichten können 
zwischen 1 und 8 Zeichen lang sein. Normalnachrichten zwischen 1 und der bei 
YOPNCON zurückgegebenen Maximallänge. 


Hinweis 
Bei FHS="YES” braucht keine Länge eingetragen werden. Das Längenfeld muß 
aber vorhanden sein; näheres siehe Manual 'FHS'.) 


der Text der zu sendenden Nachricht. Das Feld muß mindestens so groß wie die in 
12) angegebene Länge sein. Im Falle FHS="YES” ist hier der FHS-Ubergabebereich 
zu verwenden (näheres siehe Manual 'FHS'). 


Ferner kann angegeben werden: 


3) 


4) 


die Laufnummer, die mit der Nachricht dem Empfänger zugestellt werden soll. Sie 
dient ferner der Identifikation der Transportquittung für diese Nachricht und wird mit 
ihr zurückgegeben. 

Für die Laufnummer kann ein Wert im Bereich von 1 bis 65535 angegeben werden. 
Der Standardwert ist 0. 


daß für die weiteren Nachrichten, die von diesem Partner kommen, die 
absenderspezifische Warteschlange eingestellt werden soll (CS-Zustand der Verbin- 
dung). Die Angabe ist nur sinnvoll, wenn die Nachrichtenverteilung nicht anhand von 
Verteilcodes erfolgt. 
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VSEND 


Beschrei- 


bung Versorgung der Felder 


CALL USING 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


YSEND 01 APP-NAME. .. EE 


GE L l a 
02 TOVAL PIC 9(4) COMP. 
seo |[865(ሀ)668ኮ8.| [ 5 |] 


02 OPTCD. 
03 8ዞፎር PIC X(3). 


03 65 PIC X(3). || 
03 AUFTEILUNG PIC X(3). {“ELE“|“SUB“} 


"weus lee |e] [o 
a o. OT. 29988 


ዐ1 CONN-NAME. 


01 BEREICH 1. 


"ው 01 FHS-MAIN-PAR. Sa siehe FHS-Manual 


1) Die Länge hängt davon ab, ob Restart, Teilformatierung oder beides benutzt wird. 


Anzahl Bytes in der Länge 
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VSEND 


5) 


6) 


7) 


8) 


9) 


14) 


15) 


16) 


wenn bei YOPNCON die Attribute EDIT—'USR' oder EDIT="SYS” und 
TRANSF="PHY” eingestellt wurden: Die Angabe, welche Teilstruktur der Nachricht 
übermittelt wird. 


"ELE steht für Element einer Gruppe oder Untergruppe. 
"SUB" steht für letztes Element einer Untergruppe. 


Bei leerem Feld wird die Nachricht als letztes oder einziges Element übermittelt 
(GROUP). 


Die Angabe wird mit der Nachricht übermittelt und dem Empfänger übergeben. Ist 
er eine Datenstation, wird die Angabe, soweit es möglich ist, in eine Steuerinforma- 
tion übersetzt (Block, letzter Block einer Nachricht, letzter Block der Übertragung). 


daß dies eine Expreßnachricht sein soll. Sie wird unter Umgehung aller 
Datenflußkontrollen dem Partner übermittelt und überholt Nachrichten, die vorher 
gesendet und noch nicht abgeholt wurden. Die Maximallänge einer solchen 
Nachricht beträgt 8 Bytes. Bedingung ist, daß die Verbindung mit dem Attribut 
EDIT—'USR' aufgebaut wurde. Bei leerem Feld wird die Nachricht als Normalnach- 
richt übermittelt. 


daß eine Gutquittung über den Nachrichtentransport einschließlich der Übergabe an 
den Empfänger erwartet wird. Bei leerem Feld wird keine Gutquittung erwartet. 
Bedingung ist, daß diese Anwendung Quittungen entgegennimmt (TACK="PRI”, 
TACK — 'REQ' bei YOPEN). 


daß ein akustischer Alarm ausgelöst werden soll. Bedingung ist, daß die Verbindung 
mit dem Attribut EDIT="SYS” aufgebaut wurde. 


daß mit der integrierten Formatsteuerung FHS gearbeitet werden soll. Wird die 
integrierte Formatsteuerung nicht verwendet, müssen im Sendebereich formatierte 
Daten zur Verfügung gestellt werden. Bedingung ist, daß für die Verbindung 
EDIT="SYS” und TRANSF="FOR” eingestellt wurde. 


der Name einer FHS-Operandenstruktur, wenn die Formatierung von FHS vorgenom- 
men wird (FHS — 'VES'). 


die Länge eines Verwaltungsbereichs fur FHS-C zur Teilformatierung und Wiederan- 
lauf. 


reserviert für FHS, Mindestlänge siehe FHS-Manual. 


Hinweis 


Wenn DCAMVER > 8.0 angegeben wurde, wird bei Ausgabeformatierung mit FHS der 
FHS-Operandenbereich (FHS-MAIN-PAR) und - falls angegeben - der FHS-Verwal- 
tungsbereich (BEREICH2) von DCUS intern kopiert und bis zum nächsten YRECEIVE 
von demselben Partner zwischengespeichert. FHS werden für die Eingabeformatierung 
diese Kopien zur Verfügung gestellt. Nach der Eingabeformatierung durch FHS werden 
die Kopien dem Benutzer im FHS-MAIN-PAR und im BEREICH2 wieder zurückgegeben. 


DCAM gibt zurück: 


10) 
11) 


den Rückgabecode. 


den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 
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3.3.2 


3.3.2.1 


YRECEIVE 


Empfangen einer Nachricht oder Transportquittung 


Der Empfangsaufruf wird neutral ausgegeben. Aufgrund der Rückgabe stellt der Benutzer 
fest, ob er eine Nachricht oder eine Transportquittung empfangen hat. Lediglich der 
Zugriff auf die absenderspezifische oder empfängerglobale Warteschlange erfordert 
unterschiedliche Angaben. Der Zugriff auf die verteilcodespezifischen Warteschlangen 
wird über eine vorherige Zuordnung gesteuert (siehe 3.3.5). 

Der Empfangsaufruf wird asynchron ausgefihrt, wenn SYN="NO” angegeben ist; 
Standardwert ist SYN ="YES”. 


Zugriff auf die empfangerglobale Warteschlange 


Bedingung ist, daß vorher diese Warteschlange eingestellt wurde. Dies ist möglich beim 
YOPNCON, YSEND und YRECEIVE. Bei Verteilcode-Verwendung entfällt diese Bedingung. 
Die Nachricht eines beliebigen Partners wird empfangen; bei Verteilcode-Verwendung im 
Rahmen der vorher zu treffenden Zuordnung. 


Dazu muß angegeben werden: 
1) der Name der DCAM-Anwendung. 


15) die Länge des Bereichs, in dem DCAM die Nachricht eintragen soll. Bei FHS="YES” 
braucht keine Länge eingetragen zu werden. Das Längenfeld muß aber vorhanden 
sein (näheres siehe Manual 'FHS'). 


Ferner kann angegeben werden: 


6) daß der Aufruf, falls er nicht sofort ausgeführt werden kann, weil keine Nachricht 
vorliegt, in eine Warteschlange eingetragen werden soll. Fehlt die Angabe, wird er in 
jedem Fall sofort beendet und muß ggf. später wiederholt werden. 


3) die Wartezeit dieses Aufrufs, falls er in eine Warteschlange eingetragen werden soll. 
Sie beträgt mindestens 1 und höchstens 32767 Sekunden. Standardwert ist 600 
Sekunden. 


5) daß für künftige Aufrufe die absenderspezifische Warteschlange eingestellt werden 
soll (CS-Zustand der Verbindung). Alle folgenden Nachrichten des Partners werden 
diesem Prozeß übergeben. Wenn bei Nachrichtenüberlauf die Überlänge mit einem 
weiteren YRECEIVE abgeholt werden soll, muß diese Warteschlange eingestellt 
werden. 


Die Angabe gilt für die nächstfolgenden YRECEIVE-Aufrufe und zwar solange, bis sie 
wieder geändert wird. Sie ist bei Verteilcode-Verwendung nicht notwendig und wird 
nicht ausgewertet. Wird eine Transportquittung empfangen, wird sie ebenfalls nicht 
ausgewertet. 


7) daß bei zu langen Nachrichten der Nachrichtenrest für einen weiteren YRECEIVE 
aufgehoben wird ('KEE'— KEEP). Voraussetzung ist, daß für die Verbindung der 
CS-Zustand eingestellt wird; siehe 5). Die Einstellung 'TRC'— TRUNC bedeutet, daß 
der Nachrichtenrest nicht aufgehoben wird. Wird hier keine Angabe gemacht, wird 
das angenommen, was bei YOPNCON in der Verbindungsnachricht angegeben 
worden ist. 


8) daß die integrierte Formatsteuerung FHS verwendet wird. 
Dabei muß bereits beim YSEND eine FHS-Parameterstruktur vollständig versorgt 
werden (d.h. alle Angaben für die Eingabe- und Ausgabeformatierung müssen 
versorgt werden). Die FHS-Parameterstruktur wird von DCUS intern bis zum 
nächsten YRECEIVE zwischengespeichert. In der FHS-Parameterstruktur muß hier 
nichts angegeben werden. Sie dient der Rückgabe von Informationen durch DCAM, 
wenn DCAMVER = DCAMVS ist. 


18) der Name einer FHS-Operandenstruktur, wenn die Formatierung von FHS vorgenom- 
men wird. 


19) der Name eines Verwaltungsbereichs für FHS. 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-Z75-3 3-43 


VRECEIVE 


20) die Länge des Verwaltungsbereichs. 


Hinweis 


Soll die Aufbereitung der Daten durch FHS-C erfolgen (FHS="YES”), muß bereits beim 
YSEND eine FHS-Operandenstruktur vollständig für die Ein- und Ausgabeformatierung 
versorgt werden. Diese wird von DCUS intern bis zum nächsten YRECEIVE auf 
derselben Verbindung zwischengespeichert. 


FHS-MAIN-PAR und BEREICH2 werden abhängig vom DCAMVER-Operanden des YOPEN 
ausgewertet: 


— DCAMVER ist nicht angegeben (DCAMVER < V8.0) 
FHS-MAIN-PAR wird beim YRECEIVE nicht angegeben. Die Eingabeformatierung wird 
mit dem FHS-MAIN-PAR des vorangegangenen YSEND durchgeführt. Die Rückmeldun- 
gen von FHS stehen im FHS-MAIN-PAR des vorangegangenen YSEND. 


Einschränkungen 


YRECEIVE (ANY) ist bei mehreren Verbindungen mit unterschiedlichen Formaten nicht 
möglich. 
Der FHS-Betrieb ist bei Anwendungen mit SHARE ="YES” nicht möglich. 


— DCAMVER ist > V8.0 
FHS-MAIN-PAR muß immer angegeben werden. Die Rückmeldungen werden in 
FHS-MAIN-PAR zur Verfügung gestellt. 
BEREICH2 muß nur angegeben werden, wenn bei der Formatierung mit Wiederanlauf 
oder Teilformatierung gearbeitet wird. 


(Siehe auch Hinweise zu YSEND). 


DCAM gibt zurück: 


2) die Adresse des Absenders der Nachricht oder Transportquittung. Die Adresse 
besteht aus Partner- und Prozessornamen. 


9) die Laufnummer der Nachricht, die der Partner ihr gegeben hat. Bei Datenstationen 
wird sie im Kommunikationssystem erzeugt. 


10) wenn eine Transportquittung empfangen wurde, die Laufnummer der quittierten 
Nachricht. 


11) und 16) 
die tatsächliche Länge der empfangenen Nachricht oder die Länge des Nachrichten- 
restes, wenn die Nachricht länger war, als im Feld EMPF-LAENGE angegeben. 


17) die Nachricht selbst. Im Falle FHS="YES” wird hier der FHS-Übergabebereich 
verwendet (näheres siehe Manual 'FHS'). 


Ferner: 
12) den Rückgabecode. 


13) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 


14) den Indikator. Er gibt Auskunft, ob eine positive oder negative Quittung oder welcher 
Teil einer Nachricht empfangen wurde. 


Hinweis 


Beim YRECEIVE wird die gleiche FHS-Struktur verwendet wie beim letzten zugehörigen 
YSEND. 


Nach Eintreffen des Returncodes 'Teilformatierung nicht beendet” in der Befehlsstruk- 
tur ist der YRECEIVE so oft zu wiederholen, bis der Returncode 'Teilformatierung 
beendet” erscheint, um die restlichen Teilformate abzuholen. 
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VRECEIVE 


Beschrei- 
CALL USING bung Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 
YRECEIVE 01 APP-NAME. EEE 


02 APPNAME PIC X(8). 


OT CONN NAME TE 


anwendungsname 


partnername 
prozname 


01 BEF-NAME. 


"esoe [PIC 94) COMP. 
` "ENER ግ 
use mommy | [«] [ves 
MT l-Em if 


z 
o2 FDB SYNCHRONIZED | 
— T 


ruckgabecode 
fehlercode 


02 CAENGE 1 PIC 9(4) COMP. 


02 TEXT 1 PIC X(m). 


ILL... 01 FHS-MAIN-PAR. SH MRA siehe FHS-Manual 


02 LAENGE 2 PIC 9(4) COMP. lange (siehe YSEND) 
02 TEXT 2 PIC X (m). Anzahl Bytes in der Lange 
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VRECEIVE 


3.3.2.2 Zugriff auf die absenderspezifische Warteschlange 


Bedingung ist, daß vorher diese Warteschlange eingestellt wurde. Die ist möglich beim 
YOPNCON, YSEND und YRECEIVE. Bei Verteilcode-Verwendung entfällt diese Bedingung. 


Dazu muß angegeben werden: 


1) 
2) 


4) 


14) 


der Name der DCAM-Anwendung. 


die Adresse des Partners, von dem die Nachricht erwartet wird. Die Adresse besteht 
aus dem Partner- und Prozessornamen. 


daB die Nachricht oder Transportquittung eines bestimmten Partners empfangen 
werden soll. 


die Länge des Bereichs, in den DCAM die Nachricht eintragen soll. 


Ferner kann angegeben werden, was bereits für den Zugriff auf die empfängerglobale 
Warteschlange beschrieben wurde (Abschnitt 3.3.2.1: 3); 5); 7)). 


DCAM gibt zurück, was bereits im Abschnitt 3.3.2.1 beschrieben wurde, mit Ausnahme 
von 2). 
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VRECEIVE 


Beschrei- 


CALL USING bung Versorgung der Felder 
Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


YRECEIVE 


01 CONN-NAME. 


01 BEF-NAME. 


— CAD 
SSS SSIS 
a Gm, 


Po x) 


BACKS 
| OSFPOSOVNOĦRONZED. | ss 


laufnummer | 
quittungsnummer 


0S ARECLN 
— |. 


01 EMPF-BEREICH. ee 


ruckgabecode 
indikator 


| O2EMPF-TEXT PIC X(m). 
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VRESET 


3.3.3 Senden und Empfangen kombiniert 


Einschränkung 


Bei COBOL gibt es YSENDREC nicht. 


3.3.4 Ändern des CS/CA-Zustands einer Verbindung 


Dazu muß angegeben werden: 
1) der Name der DCAM-Anwendung. 


2) die Adresse des Kommunikationspartners. Sie besteht aus Partner- und Prozessorna- 
men. 


3) daß der Aufruf auf einen bestimmten Partner bezogen ist. 
Es kann angegeben werden: 


4) daß die absenderspezifische Warteschlange eingestellt werden soll (CS). Wird nichts 
angegeben, wird die empfängerglobale Warteschlange eingestellt (CA). 


Hinweis 


YRESET kann nur angewandt werden mit SPEC="YES” und DISCO — 'NO'. 
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VRESET 


CALL USING Beschreibung Versorgung der Felder 


Muster für Stufennummern PICTURE- 
Datensatz- und Datennumern Klausel 


01 BEF-NAME. Ka 
፣ሬኤዴጮ።ዔ 


Kg. ang ae: au 


01 CONN-NAME. 
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VPERMIT 


3.3.5 Steuerung der Verteilcode-Zuordnung 


Fur die Steuerung der Verteilcode-Zuordnung stehen dem PrimàrprozeB 2 Aufrufe zur 
Verfügung. Mit dem einen kann er eine Zuordnung von Verteilungsnamen und 
Verteilcode-Gruppe herstellen (YPERMIT), mit dem zweiten löst er diese Zuordnung wieder 
auf (YFORBID), ohne eine neue Zuordnung zu treffen. 


3.3.5.1 Zuordnen eines Verteilungsnamens zu einer Verteilcode-Gruppe 


Dazu muß angegeben werden: 
1) der Name der DCAM-Anwendung. 
4) der Verteilungsname, der einer Verteilcode-Gruppe zugeordnet werden soll. 


5) der symbolische Name der Verteilungsstruktur, die die Verteilcode-Gruppe enthält, 
die zugeordnet werden soll. 


6) die Anzahl der Verteilcode-Gruppen in dieser Struktur. 


7) und 10) 
der symbolische Name der Verteilcode-Gruppe, die zugeordnet werden soll. 


Ferner können angegeben werden: 
8) die Menge der in der Gruppe enthaltenen Codes. 
9) die Werte der Verteilcodes. 


Hinweis 


Die Angaben zu 8) und 9) werden nur dann ausgewertet, wenn diese Struktur nicht 
bereits durch YOPNCON zum Aufbau einer Verbindung oder einen anderen YPERMIT 
benutzt wurde. Änderungen sollten nur mit YCHANGE erfolgen (Abschnitt 3.2.4). 


DCAM gibt zurück: 
2) den Rückgabecode. 


3) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 
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VPERMIT 


Beschrei- 
CALL USING bung Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


YPERMIT 01 APP-NAME. au abet 


02 FDBK SYNCHRONIZED. Ga 


03 RCD PIC 9(4) COMP. 
3 ECI PIC 9(4) COMP. 
- - 5:225: 


ዐ1 VTLG-NAME. 


02 CODEGRUPPE 
OCCURS 8 TIMES. 


03 CODENO PIC 9(4) COMP. 


03 CODEVAL PIC X(8) 
OCCURS 8 TIMES. 


(O<menge<9) 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-Z75-3 3-51 


VFORBID 


3.3.5.2 Auflösen der Zuordnung 


Dazu muß angegeben werden: 


1) der Name der DCAM-Anwendung. 


4) der Verteilungsname, dessen Zuordnung zu einer Verteilcode-Gruppe aufgehoben 
werden soll. Der Name kann 1 bis 8 Zeichen lang sein. Er muß nach links 
ausgerichtet und - wenn nötig - nach rechts mit Leerzeichen aufgefüllt sein. 


Hinweis 


Dieser Aufruf ist nur dem Primärprozeß erlaubt. Die Anwendung muß 'shareable' und 
DISCO — 'VES' eingestellt sein. 


DCAM gibt zurück: 
2) den Rückgabecode. 


3) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte (Eintragungen siehe Anhang ል.4). 


Beschrei- 


bung Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


YFORBID 
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3.4.1 


YWAIT 
CALL-Aufrufe fiir asynchrone Verarbeitung 


Warten auf Beendigung von asynchronen DCAM-Auftragen 


Nach einem asynchronen Aufruf (YOPNCON, YRECEIVE) soll ein Ereignis eintreffen. 
Möglich sind die folgenden Ereignisse: 


— OPENED 
— LETTER 
- GOSIGNAL 
— LOSCON 
— NOEVENT 


Ereignis | Bedeutung 


OPENED Der YOPNCON-Auftrag ist beendet; näheres siehe Befehls- und 
Verbindungsstruktur 

LETTER Der YRECEIVE-Auftrag ist beendet; näheres siehe Befehls- und 
Verbindungsstruktur 


GOSIGNAL | Der Speicherplatz-Engpaß ist aufgehoben, näheres siehe Befehls- 
und Verbindungsstruktur 


LOSCON Die Verbindung wurde durch das System oder vom Partner abgebaut; 
näheres siehe Befehlsstruktur 


NOEVENT Es ist kein Ereignis eingetroffen; näheres siehe Befehlsstruktur 


Im Rückmeldefeld erhält der Benutzer den Returncode des Warte-Aufrufs. Ist ein Ereignis 
eingetroffen (RSI=0), steht der Returncode für die Beendigung des asynchronen 
DCAM-Auftrags oder der LOSCON-Reason in der Befehlsstruktur, die mit dem 
YWAIT-Auftrag angegeben wurde. 


Grenzwerte für asynchrone Aufrufe siehe Anhang A.3. 


Hinweis 


Für "Warten auf Ereignis” verwendet DCUS intern das P1-Eventing. Damit wird eine 
prozeßspezifische Warteschlange für DCAM-Ereignisse realisiert. 
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YWAIT 


3.4.1.1 Empfang von Nachrichten 


Nach Beendigung eines YRECEIVE-Auftrags tritt das DCAM-Ereignis LETTER ein. Die 
restlichen Teilformate werden mit einem erneuten YRECEIVE abgeholt. 


Dazu kann angegeben werden: 


1) 


die Zeit in Sekunden, die der ProzeB auf das Eintreffen eines Ereignisses warten soll. 
Standardwert ist 60. 


DCAM gibt zuriick: 


2) den Returncode des Ereignisses. 

3) das Ereigniskennzeichen LETTER. 

4) den Anwendungsnamen. 

5) die Adresse des Kommunikationspartners in der Verbindungsstruktur, bestehend aus 
dem Partnernamen und dem Namen des Prozessors, an dem der Partner 
angeschlossen ist. 

6) die Laufnummer der Nachricht, die der Partner ihr gegeben hat. Bei Datenstationen 
wird sie im Kommunikationssystem erzeugt. 

7) die Laufnummer der quittierten Nachricht, wenn eine Transportquittung empfangen 
wurde. 

8) die tatsachliche Lange der empfangenen Nachricht oder die Lange des Nachrichtenre- 
stes, wenn die Nachricht langer war als in EMPF-LAENGE beim YRECEIVE-Aufruf 
angegeben war. 

9) den Rückkehrcode. 

10) den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte. 

11) den Indikator. 

12) die FHS-Operandenstruktur, wenn die Formatierung von FHS vorgenommen wird. 

13) die Länge des FHS-Verwaltungsbereichs. 

14) den FHS-Verwaltungsbereich. 

Hinweis 


Nach Eintreffen des Returncodes 'Teilformatierung nicht beendet” in der Befehlsstruk- 
tur ist der YRECEIVE so oft zu wiederholfen, bis der Returncode 'Teilformatierung 
beendet” erscheint und die restlichen Teilformate abholt. 
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YWAIT 


Beschrei- 
CALL USING bung ` Versorgung der Felder. 


Muster für Stufennamen, PICTURE- 
Datensatz- und Datennamen Klausel 
YWAIT 01 WAIT-NAME. 


03 RETCODE 

5:1. | IC COME RS-Rückgabecode 
Fee. 7. "ERR, | SI-Rückgabecode 
a.  : [ር8. 

02 APPNAME PIC X(9) [4 ] 
01 CONN-NAME. 
_ O2PTNNAME ሁቲ | PIC X(8). GH 

02 PRONAME PIC X(8). Proz.Name zurück 
01 BEF-NAME. — 


PIC 9(4) COMP 


PIC 9(4) COMP. 
PIC 9(4) COMP. 


PIC 9(4) COMP 


PIC 9(4) COMP. 


rückgabecode 
fehlercode 


indikator 


siehe FHS-Manual 


-፦- 


— መ =) በ1 FHS-MAIN-PAR. ጄን 


01 BEREICH 2 ጀጀ 


--1-- - - -- - - - - - 


02 LAENGE 2 PIC 9(4) COMP. | | 13 | | lange 
02 IEXT 2 PIC X(m) Anzahl Bytes in der Länge | 
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VWAIT 


3.4.1.2 Aufbau einer Verbindung 


Nach Beendigung eines YOPNCON-Auftrags tritt das Ereignis OPENED ein. 


Dazu kann angegeben werden: 


1) 


die Zeit in Sekunden, die der Prozeß auf das Eintreffen eines Ereignisses warten soll. 
Standardwert ist 60. 


DCAM gibt zurück: 


2) 
3) 
4) 
5) 


6) 
7) 
8) 
9) 
10) 
11) 


12) 
13) 


den Returncode des Ereignisses. 
das Ereigniskennzeichen (OPENED). 
den Anwendungsnamen. 


die Adresse des Kommunikationspartners in der Verbindungsstruktur, bestehend aus 
dem Partnernamen und dem Namen des Prozessors, an dem der Partner 
angeschlossen ist. | 


die Art des Dateiübermittlungsprotokolls. 

die Art der Nachrichtenaufbereitung. 

den Beginn der Datenibermittlung. 

die maximale Nachrichtenlänge. 

die Partnercharakteristika (siehe Anhang A.5). 


die tatsächliche Länge der Verbindungsnachricht oder die Länge des Restes, wenn die 
Verbindungsnachricht länger war, als im BEREICH1 beim YOPNCON-Aufruf angege- 
ben. 


den Rückgabecode. 


den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte. 
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YWAIT 


Beschrei- 
CALL USING bung Versorgung der Felder 


Muster für Stufennamen, PICTURE- 
Datensatz- und Datennamen Klausel 
YWAIT 01 WAIT-NAME. 
03 RETCODE 
[cre IT EICHE SI-Rückgabecode 


[os rst] 86 5()00688 


02 APPNAME PIC X(9) EN 
01 CONN-NAME. 

02 PTNNAME PIC X(8). 

02 PRONAME PIC X(8). 


DJ 
02 DEPROT PIC X(3). 


03 APPSTART | 
02 MAXLN 
02 PTNCHAR. 
sa AAR Die ersten 4 
03 DEVTVPE Felder 
der Partner- 
| charakteristika 
03 DEVSEC | 
01 BEF-NAME. B Se 
en 
Länge der 
un -. - PIC 9(4) COMP. Verbind. Nachr. 
03 FDBK. E 
04 RCD PIC 9(4) COMP. | | 12 | | rückkehrcode 
04 ECD PIC 9(4) COMP. | | 13 | | fehlercode 
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YWAIT 


3.4.1.3 GO-Meldung 


Nach Beseitigung einer Stausituation tritt das DCAM-Ereignis GOSIGNAL ein. 


Dazu kann angegeben werden: 


1) 


die Zeit in Sekunden, die der ProzeB auf das Eintreffen eines Ereignisses warten soll. 


Standardwert ist 60. 


DCAM gibt zurück: 


2) 
3) 
4) 
5) 


6) 
7) 


8) 


den Returncode des Ereignisses. 
das Ereigniskennzeichen GOSIGNAL. 
den Anwendungsnamen. 


die Adresse des Kommunikationspartners in der Verbindungsstruktur, bestehend aus 
dem Partnernamen und dem Namen des Prozessors, an dem der Partner 
angeschlossen ist. 


den Ruckkehrcode. 


den Fehlercode, wenn der Aufruf nicht oder nicht fehlerfrei ausgeführt werden 
konnte. 


den Indikator. 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-Z75-3 


YWAIT 


Beschrei- 
CALL USING bata S Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 


YWAIT 01 WAIT-NAME. 


a | 

ı 069706 : tee" 8 
_ SM LEE 
mm m  -- 


01 APP-NAME. 
02 APPNAME PIC X(9) 
01 CONN-NAME. 
02 PTNNAME PIC X(8). 
02 PRONAME PIC X(8). 


rückkehrcode 
fehlercode 
Indikator 
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YWAIT 


3.4.1.4 Meldung über Verbindungsabbau (LOSCON) 


Nach einem Verbindungsabbau tritt das DCAM-Ereignis LOSCON ein. 


Dazu kann angegeben werden: 


1) 


die Zeit in Sekunden, die der Prozeß auf das Eintreffen eines Ereignisses warten soll. 


Standardwert ist 60. 


DCAM gibt zurück: 


2) 
3) 
4) 
5) 


6) 


den Returncode des Ereignisses. 
das Ereigniskennzeichen LOSCON. 
den Anwendungsnamen. 


die Adresse des Kommunikationspartners in der Verbindungsstruktur, bestehend aus 
dem Partnernamen und dem Namen des Prozessors, an dem der Partner 
angeschlossen ist. 


den Grund für den Verbindungsabbau (Feld LOSCON-REASON in der Befehlsstruktur). 
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YWAIT 


Beschrei- 
CALL USING bung Versorgung der Felder 


Muster für Stufennummern, PICTURE- 
Datensatz- und Datennamen Klausel 
YWAIT 01 WAIT-NAME. 


03 RETCODE 


| O5RRS | PIC 9(4) COMP 
PS ኢሲ እ Pi 94) COMP. 
_ oe ee 


| RS-Rückgabecode 
Sl-Rickgabecode 


Anwendungsname 


02 PRONAME PCX 


01 BEF-NAME. — a 


03 LOSCON-REASON 


[_6_] [_Loscon-Reason 
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YWAIT 


Gründe für einen Verbindungsabbau (LOSCON) 


Wert Grund 


0 
4 
8 
12 
16 


20 


24 


32 
36 
40 
44 
52 
56 


64 


84 
88 


92 


Der Verbindungsabbruch wurde vom Benutzer gefordert 
Ungültige DEPROT/EDIT-Kombination 

Verbindungsabbau wegen Verarbeitungsfehler beim Partner 

Der Partner ist nicht erreichbar (z.B. Terminal ausgefallen) 
Der Verbindungsabbruch wurde vom Systemoperateur eingeleitet 


Der Partner hat seine Verbindung verloren. Er wird erneut zum 
Verbindungsaufbau auffordern 


Der Verbindungsabbruch ist auf eine Inkonsistenz oder einen Fehler 
im Datenübertragungsnetz zurückzuführen. 


Warnung: Verbindungsabbruch 

Partnercharakteristik wird vom Partner nicht akzeptiert 
Verbindungsabbau nach Aufforderung durch die Systemverwaltung 
Verbindungsabbau wegen Fehler im Benutzerdienstverbindungsprotokoll 
Verbindungsabbau wegen Fehler im Benutzerdienstprotokoll 
Verbindungsabbau wegen Fehler im Transportsystem 


Verbindungsabbau wegen Syntaxfehler in der Benutzernachricht des 
Verbindungsprotokolls (LOGON-Nachricht) 


Netzpriorität wurde vom Partner nicht akzeptiert 
Betriebsmittelengpaß im Partnersystem (zuviele NTACK’s) 


VTSU des Partners ist nicht aktivierbar 
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4.1 


4.1.1.1 


Tvpische Einsatzfàlle (Beispiele) 


In diesem Kapitel sind Beispiele gezeigt, die tvpische Einsatzfàlle wiedergeben. 
Selbstverstàndlich enthàlt jedes konkrete Problem soviele Abweichungen von den hier 
theoretisch erörterten Problemstellungen, daß diese Beispiele keine 'Kochrezepte' sein 
können. Noch viel weniger erheben sie Anspruch auf Vollständigkeit. 


Die Unterteilung in einfache und komplexe Anwendungsfälle bezieht sich auf das bereits 
im Abschnitt 1.3 Gesagte. 


Einfache Einsatzfälle 


Datenkommunikation im Verarbeitungsrechner 


Die Datenkommunikation innerhalb eines Verarbeitungsrechners ist ein Anwendungsfall 
der DCAM-Schnittstelle. Dabei gilt: 


Für das DCAM-Programm bleibt unsichtbar, ob Datenkommunikation mit einem Partner im 
selben oder in einem anderen Verarbeitungsrechner betrieben wird. 

Lediglich am Prozessornamen des Partners ist der Unterschied zu erkennen. Insbesondere 
für den Programmtest ergeben sich daraus große Vorteile (Simulation ist leicht möglich). 


Modell für Kommunikation mit 'SCONSOLE' 


Der hier skizzierte Anwendungsfall erscheint in seiner Form vielleicht zu konstruiert. Er 
wurde so gewählt, weil die Schaffung eines Programms zur automatischen oder von einer 
Datenstation zu steuernden Systembedienung eine sehr ähnliche Aufgabe wäre. Um daher 
dem Anwender von UCON (Universal CONsol support) zu helfen und einen einfachen Fall 
von Datenkommunikation im gleichen Verarbeitungsrechner zu zeigen, dient folgendes 
Beispiel. Die Prinzipdarstellung der Kommunikation mit 'SCONSOLE' zeigt Bild 4-1. 


Eine ausführliche Beschreibung der UCON-Schnittstelle $CONSOLE finden Sie im Manual 
"852000 Systemverwaltung”. 
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4-2 


Svstem 


Bild 4-1 


Kommunikation 


Benutzerprogramm 


mit “SCONSOLE” 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-275-3 


4.1.1.2 


4.1.1.3 


Aufbau des Beispiels 


2 Anwendungen ibermitteln sich Daten zum Zweck der Verarbeitung bzw. Weitergabe. 
Sie sind einfach benutzbar und werden von je einer Datenstation im Teilnehmerbetrieb 
gesteuert. Die Programme enthalten darum auch Aufrufe der RTIO (remote terminal input 
output)- Schnittstelle. Folgendes Bild 4-2 gibt einen Überblick über den Modellaufbau. 


Laden Laden 
ው ለ] Synchronisation — nn 8 ) Benutzer- 
SUVON Fehlermeldungen dialog 
Fehlermeldungen 


| YOPEN ..PVTHAGOR' YOPEN MITTLERT ` 


VINQUIRE dern see ቿች a 


Verbindungsaufbau VOPNCON ACQUIRE 


Dialog-Schleife 


YRECEIVE von „PYTHAGOR“ 


DISPLAY und ACCEPT 


Verarbeitung 


Bild 4-2 Datenkommunikation im selben Verarbeitungsrechner 


Programm zur Vermittlung 


Im Vermittlungsprogramm wird 
— die DCAM-Anwendung eröffnet, 


— zur Verbindung mit dem Verarbeitungsprogramm aufgefordert und eine Verbindungs- 
nachricht zur Identifikation mitgeliefert, 


— der Dialog mit der Datenstation und 
— der Dialog mit dem Kommunikationspartner geführt. 


Die Verbindungsnachricht wird verwendet, da dies bei der Kommunikation mit 
"SCONSOLE” ebenfalls erforderlich wäre. Fehlermeldungen werden auf der Datenstation 
ausgegeben. 
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Bild 4-3 


Bild 4-4 


YOPNCON (Aufforderung) 


FDBK o.k.2 


Display Nachricht 


Accept Antwort | 


Schleife fortsetzen 


Struktogramm für Vermittlungsprogramm 


Display RCD in A-Struktur 
Display ECD in A-Struktur 


Display IND in A-Struktur 


Display RCD in B-Struktur 


Display ECD in B-Struktur 


Display IND in B-Struktur 


Unterprogramme im Vermittlungsprogramm 
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IDENTIFICATION DIVISION. 
PROGRAM-ID. BEISPIEL. 
ENVIRONMENT DIVISION. 
DATA DIVISION. 
WORKING-STORAGE SECTION. 

COPY YDDCUAPL. 

COPY YDDCUCON. 

COPY YDDCUCOM. 

COPY YDDCUDIS. 
01 V-NACHRICHT. 


02 LAENGE PIC 9(4) COMP VALUE IS ZERO. 
02 TXT PIC X(80) VALUE IS SPACES. 
01 SENDE-BEREICH. 
02 SENDE-LAENGE PIC 9(4) COMP VALUE IS ZERO. 
02 SENDE-TEXT PIC X(8) VALUE IS SPACES. 
01 EMPF-BEREICH. 
02 EMPF-LAENGE PIC 9(4) COMP VALUE IS ZERO. 
02 EMPF-TEXT PIC X(450) VALUE IS SPACES. 
77 ANTWORT PIC X(8) VALUE IS SPACES. 
77 EK PIC X VALUE IS SPACE. 
PROCEDURE DIVISION. 
EROEFFNEN. 
* ANWENDUNG "MITTLER” WIRD EROEFFNET. 


MOVE 'MITTLER ' TO APPNAME IN APP-NAME. 
CALL 'VOPEN' USING APP-NAME. 

IF ዘርዐ IN APP-NAME ፲5=0 THEN NEXT SENTENCE 
ELSE GO TO PAR3. 

MOVE 'PVTHAGOR' TO PTNNAME IN CONN-NAME. 
MOVE 'DSO18HO1' TO PRONAME IN CONN-NAME. 
MOVE "YES” TO SPEC IN BEF-NAME. 

MOVE 'NO' TO ACCPT IN BEF-NAME. 

MOVE 'VES' TO CS IN BEF-NAME. 

MOVE 80 TO LAENGE IN V-NACHRICHT. 


* 
. DER AUFFORDERUNG ZUM VERBINDUNGSAUFBAU SOLL EINE 
. VERBINDUNGSNACHRICHT MITGEGEBEN WERDEN. DIESE WIRD 
. IN DAS FELD TXT IN V-NACHRICHT GESCHRIEBEN. 
* 
* 
MOVE "ANWENDUNG MITTLER WARTET AUF ANNAHME” TO TXT IN 
V-NACHRICHT. 
* 
. AUFFORDERUNG ZUM VERBINDUNGSAUFBAU ልዘ PVTHAGOR 
* 
CALL "YOPNCON” USING APP-NAME CONN-NAME BEF-NAME 
VTLG-NAME V-NACHRICHT. 
IF RCD IN BEF-NAME IS-0 THEN NEXT SENTENCE 
ELSE GO TO PAR2. 
MOVE 600 TO TOVAL IN BEF-NAME. 
MOVE 'VES' TO በ IN BEF-NAME. 
MOVE 450 TO EMPF-LAENGE IN EMPF-BEREICH. 
DIALOG. 


IF EK IS NOT="E” THEN NEXT SENTENCE 

ELSE GO TO SCHLUSS. 

CALL 'VRECEIVE' USING APP-NAME CONN-NAME BEF-NAME 
EMPF-BEREICH. 

IF RCD IN BEF-NAME ፲5=0 THEN NEXT SENTENCE 

ELSE GO TO PARI. 

DISPLAY EMPF-TEXT UPON TERMINAL. 

MOVE 8 TO SENDE-LAENGE IN SENDE-BEREICH. 

MOVE SPACES TO ANTWORT SENDE-TEXT IN SENDE-BEREICH 
EMPF-TEXT. 
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ES 


EINGABE DER KATHETENLAENGEN. 


ACCEPT ANTWORT FROM TERMINAL. 
MOVE ANTWORT TO SENDE-TEXT IN SENDE-BEREICH. 
CALL 'VSEND' USING APP-NAME CONN-NAME BEF-NAME 
SENDE-BEREICH. 
IF RCD IN BEF-NAME ፲5=0 THEN NEXT SENTENCE 
ELSE GO TO PARI. 
GO TO DIALOG. 
PAR1. 
PERFORM FEEDBACK2 
MOVE 'E' TO EK 
GO TO DIALOG. 
PAR2. 
PERFORM FEEDBACK2 
MOVE "Er TO EK 
GO TO SCHLUSS. 
PAR3. 
PERFORM FEEDBACK1 
MOVE 'E' TO EK 
GO TO SCHLUSS. 
FEEDBACK1. 
DISPLAY RCD IN APP-NAME UPON TERMINAL. 
DISPLAY ECD IN APP-NAME UPON TERMINAL. 
FEEDBACK2. 
DISPLAY RCD IN BEF-NAME UPON TERMINAL. 
DISPLAY ECD IN BEF-NAME UPON TERMINAL. 
DISPLAY IND IN BEF-NAME UPON TERMINAL. 
SCHLUSS. 
STOP RUN. 


4.1.1.4 Programm zur Verarbeitung 


Im Verarbeitungsprogramm wird 
— die DCAM-Anwendung eröffnet, 


— ggf. gewartet, bis die Aufforderung zum Verbindungsaufbau eintrifft (gesteuert über 
die Datenstation), 


— die Aufforderung angenommen, nachdem vorher die Verbindungsnachricht geprüft 
wurde (ggf. wird sie nicht angenommen), 


— der Dialog mit dem Kommunikationspartner geführt und 


— die Anfragen des Kommunikationspartners verarbeitet (Texte und Ergebnisse bereitge- 
stellt). | 


Fehlermeldungen werden auf der Datenstation ausgegeben. 
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erfolgreich? 


- 008) | 
GC 


YINQUIRE "TOP" (Information Ober Partner einholen) 


erfolgreich? 


Aufforderung nicht von 
Mittler? 5889 
? i ? 


YOPNCON Display 
V-Nachricht 


nicht 
Zahlen 


| numerisch 
Verar- 
beitung 


Bild 4-5 Struktogramm für Verarbeitungsprogramm 


Display 
"Falsche 
Eingabe” 
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Bild 4-6 


Empf-Text nach Zahlen übertragen 


‚Berechnen des Ergebnisses 


Ergebnis nach Sende-Text übertragen 


Unterprogramm im Verarbeitungsprogramm 
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IDENTIFICATION DIVISION. 


PROGRAM-ID. BEISPLI. 
ENVIRONMENT DIVISION. 
DATA DIVISION. 


WORKING-STORAGE SECTION. 


77 
01 


01 


01 


01 


01 


01 


COPY YDDCUAPL. 

COPY YDDCUCON. 

COPY YDDCUCOM. 

FUNC 

TOPL-BEREICH. 

02 TOPL-LAENGE 

02 PTNCHAR. 
03 PTNTYPE 
03 DEVTYPE 
03 CHARSET 
03 DEVSEC 

02 PEDIT 

02 PPROC 

LGMSG-BEREICH. 

02 LGMSG-LAENGE 

02 LGMSG 

SENDE-BEREICH. 

02 SENDE-LAENGE 

02 SENDE-TEXTI 

SENDE-TEXT2. 

02 SENDE-TEXT3 

02 SENDE-TEXT4 

02 SENDE-TEXT5 

SENDE-TEXT6. 

02 SENDE-TEXT7 

02 SENDE-TEXT8 

02 SENDE-TEXT9 

EMPF-BEREICH. 

02 EMPF-LAENGE 

02 EMPF-TEXTI. 
03 EMPF-TEXT2 
03 EMPF-TEXT3 

02 FILLER 

H1 

H 

ZAHLEN. 

02 K1 

02 FILLER 


PROCEDURE DIVISION. 
EROEFFNEN. 


+ 


PIC X(3) VALUE IS SPACES. 


PIC 


DIE ANWENDUNG PYTHAGOR 


9(4) COMP. 


9(4) COMP. 
9(4) COMP. 
9(4) COMP. 
9(4) COMP. 
X(3). 
X(3). 


9(4) COMP VALUE IS ZERO. 
X(80) VALUE IS SPACES. 


9(4) COMP VALUE IS ZERO. 
X(450) VALUE IS SPACES. 


X(30) VALUE IS SPACES. 
X(6) VALUE IS SPACES. 
X(55) VALUE IS SPACES. 


X(149) VALUE IS SPACES. 
X(180) VALUE IS SPACES. 
X(31) VALUE IS SPACES. 


9(4) COMP VALUE IS ZERO. 


X VALUE IS SPACES. 
X(4) VALUE IS SPACES. 
X(3). 

9(5) VALUE IS ZERO. 
223.9. 


99 VALUE IS ZERO. 
X. 

99 VALUE IS ZERO. 
X VALUE IS SPACE. 
X VALUE IS SPACE. 
X VALUE IS SPACE. 
X VALUE IS SPACE. 


WIRD EROEFFNET. 


MOVE "PYTHAGOR” TO APPNAME IN APP-NAME. 
CALL 'VOPEN' USING APP-NAME. 
IF RCD IN APP-NAME IS EQUAL TO 0 THEN GO TO PARI 


ELSE PERFORM FEEDBACKI 


MOVE 'E' TO EK 
GO TO NACHFRAGE. 


PARI. 


MOVE 'TOP' TO FUNC. 


MOVE 14 TO TOPL-LAENGE IN TOPL-BEREICH. 
NACHFRAGE. ; 
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EEE FH 


+ 2.4%. 9% 


DER ERSTE EINTRAG IN EINER WARTESCHLANGE VON 
AUFFORDERUNGEN WIRD IN EINER SCHLEIFE GEPRUEFT.LAUTET DIE 
UEBERMITTELTE VERBINDUNGSNACHRICHT ''ANWENDUNG MITTLER 
WARTET AUF ANNAHME” ‚WIRD DIE AUFFORDERUNG ANGENOMMEN, 
ANDERNFALLS DIE SCHLEIFE WIEDER DURCHLAUFEN. 


IF EK IS NOT="E” AND EN IS NOT="E” THEN NEXT 
SENTENCE 
ELSE GO TO DIALOG. 
MOVE 80 TO LGMSG-LAENGE IN LGMSG-BEREICH 
CALL 'VINQUIRE' USING FUNC APP-NAME CONN-NAME 
TOPL-BEREICH LGMSG-BEREICH. 
IF RCD IN APP-NAME ፲5=0 THEN NEXT SENTENCE 
ELSE PERFORM FEEDBACK1 
ህህ: ር TO EK 
GO TO NACHFRAGE. 
IF PTNNAME IN CONN-NAME IS NOT-'MITTLER' 
DISPLAY ''AUFFORDERUNG VON” PTNNAME IN CONN-NAME 
' /ENDE=E; NACHFRAGE=N” UPON TERMINAL 
ACCEPT ANTWORT FROM TERMINAL 
IF ANTWORT IS NOT-'E' 
THEN GO TO NACHFRAGE 
ELSE MOVE 'E' TO EK 
GO TO NACHFRAGE 
ELSE IF LGMSG IN LGMSG-BEREICH IS-'ANWENDUNG MITTLER WARTET 
" AUF ANNAHME” 
MOVE 9999 TO TOVAL IN BEF-NAME 
MOVE “YES” TO Q IN BEF-NAME 
MOVE “YES” TO CS IN BEF-NAME 
MOVE 'VES' TO SPEC IN BEF-NAME 
CALL 'VOPNCON' USING APP-NAME CONN-NAME BEF-NAME 
IF RCD IN BEF-NAME ፲5=0 
MOVE 450 TO SENDE-LAENGE IN SENDE-BEREICH 
MOVE 'E' TO EN 
GO TO NACHFRAGE 
ELSE PERFORM FEEDBACK2 
MOVE 'E' TO EK 
GO TO NACHFRAGE 
ELSE DISPLAV 'V-NACHRICHT FALSCH V-NACHRICHT LAUTET' 
LGMSG UPON TERMINAL 
MOVE "5" TO ፻፪ 
GO TO NACHFRAGE. 


DIALOG. 


IN DIESER SCHLEIFE WERDEN NACHRICHTEN GESENDET UND 
EMPFANGEN. 


IF EK IS NOT EQUAL TO 'E' THEN NEXT SENTENCE 
ELSE GO TO SCHLUSS. 
MOVE SPACES TO EKR. 
MOVE "DAS PROGRAMM GIBT AN,WIE GROSS DIE HYPOTENUSE IN EINEM 
" RECHTWINKLIGEN DREIECK IST. DIE HYPOTENUSENLAENGE WIRD NACH 
"DEM SATZ VON PYTHAGORAS BERECHNET:” TO SENDE-TEXT7. 
MOVE "HYPOTENUSENQUADRAT=SUMME DER BEIDEN KATHETENQUADRATE: 
"H=K1? + K2?. GEBEN SIE JETZT ZWEI ZAHLEN 
"ZWISCHEN 1 UND 99 AN (DAS SIND DIE LAENGEN DER BEIDEN KAT 
'HETEN). ” TO SENDE-TEXT8. 
MOVE "SCHREIBEN SIE IN DER FORM AB CD” TO SENDE-TEXT9. 
MOVE SPACES TO SENDE-TEXTI. 
MOVE SENDE-TEXT6 TO SENDE-TEXTI. 
SENDEN. 
IF EK IS NOT-'E' AND EKR IS NOT-'E' 
THEN NEXT SENTENCE 
ELSE GO TO ENDE. 
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CALL 'VSEND' USING APP-NAME CONN-NAME BEF-NAME 
SENDE-BEREICH. 
| IF RCD IN BEF-NAME ፲5=0 THEN NEXT SENTENCE 
ELSE PERFORM FEEDBACK2 
MOVE 'E' TO EK 
GO TO SENDEN. 
MOVE 8 TO EMPF-LAENGE IN EMPF-BEREICH. 
EMPFANGEN. 
CALL 'VRECEIVE' USING APP-NAME CONN-NAME BEF-NAME 
EMPF-BEREICH. 
IF RCD IN BEF-NAME IS=0 THEN NEXT SENTENCE 
ELSE PERFORM FEEDBACK2 
MOVE 'E' TO EK 
GO TO SENDEN. 


DAS ERSTE ZEICHEN DES EMPFANGSTEXTES WIRD UEBERPRUEFT. 
DANACH WIRD ENTSCHIEDEN,OB UND WIE WEITER VERARBEITET 
WIRD. 


tt ጁች ታች ታዱ SS 


IF EMPF-TEXT2 IN EMPF-BEREICH IS-'J' GO TO PRUEFI. 
IF EMPF-TEXT2 IN EMPF-BEREICH IS-'N' GO TO PRUEF2. 
IF EMPF-TEXT2 IN EMPF-BEREICH IS NOT NUMERIC GO TO PRUEF3. 
IF EMPF-TEXT2 IN EMPF-BEREICH IS NUMERIC GO TO PRUEF4. 
PRUEF1. 
MOVE 'E' TO EK 
GO TO SENDEN. 
PRUEF2. 
MOVE 'E' TO EKR 
GO TO SENDEN. 
PRUEF3. 
MOVE SPACES TO SENDE-TEXTI 
MOVE "FALSCHE EINGABE” TO SENDE-TEXTI 
GO TO SENDEN. 
PRUEF4. 
PERFORM VERARBEITUNG 
GO TO SENDEN. 
ENDE. 
GO TO DIALOG. 
VERARBEITUNG. 


* 


* HIER WIRD DIE HYPOTENUSENLAENGE BERECHNET. 
* 

MOVE SPACES TO ZAHLEN. 

MOVE EMPF-TEXT1 IN EMPF-BEREICH TO ZAHLEN. 

COMPUTE H1i=K1 * K1 + K2 ። K2. 

COMPUTE ዘ=ዘ1 xx (1 / 2). 

MOVE SPACES TO SENDE-TEXT1 IN SENDE-BEREICH. 

MOVE "DIE LAENGE DER HYPOTENUSE IST” TO SENDE-TEXT3. 

MOVE H TO SENDE-TEXT4. 

MOVE " ENDE? ANTWORTEN SIE J (FUER JA) ODER N (FUER NEIN)” TO 

SENDE-TEXT5. 

MOVE SENDE-TEXT2 TO SENDE-TEXT1. 

MOVE SPACES TO SENDE-TEXT2. 
FEEDBACK1. 

DISPLAY RCD IN APP-NAME UPON TERMINAL. 

DISPLAY ECD IN APP-NAME UPON TERMINAL. 
FEEDBACK2. 

DISPLAY RCD IN BEF-NAME UPON TERMINAL. 

DISPLAY ECD IN BEF-NAME UPON TERMINAL. 

DISPLAY IND IN BEF-NAME UPON TERMINAL. 
SCHLUSS. 

STOP RUN. 
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4.1.2 


4.1.2.1 


Einschritt-Dialog mit Zeilen-Datenstation 
Stellung in einem einfachen Auskunftssystem 


Das Beispiel setzt voraus, daß das zu schreibende Programm nur die Teilaufgabe einer 
Anwendung zu lösen hat: 


e Das Programm steuert den Sekundärprozeß einer mehrfach benutzbaren Anwendung. 


e Da ein anderes Programm, das den Primärprozeß steuert, die Verbindungen aufbaut 
und verwaltet, sind hier nur Aufrufe zur Dateneingabe bzw. -ausgabe erforderlich. 


Der verbleibende Benutzerdialog wird in vereinfachter Form geführt: 


e Die Dialoge sind jeweils in einem Schritt (eine Anfrage - eine Antwort) vollständig 
abgewickelt. Darum müssen keine Daten für weitere Dialogschritte gesichert werden. 
Warteschlangenzugriffe müssen nicht gesteuert werden, da für jeden Dialogschritt ein 
neuer Partner in Frage kommen kann. 


ወ Die verwendeten Datenstationen brauchen, so unterschiedlich sie auch sind, nicht 
berücksichtigt werden. Einheitlich wird die Zeilen-Datenstation angesprochen. 


Das folgende Bild 4-7 zeigt im Überblick die Struktur des hier geschilderten 
Auskunftssystems und die Stellung der COBOL-Programme darin. Das Programm, das den 
Primärprozeß steuert, ist hier nicht näher gezeigt. Es baut die Verbindungen auf. Alle 
Datenstationen seien der Anwendung fest zugeordnet. Verbindungsabbau erfolgt ebenfalls 
im Primärprozeß, bevor die Anwendung geschlossen wird. 


Die Verarbeitung der Anfragen mit evtl. Zugriff auf Dateien ist in einem Modul mit 
ablaufinvariantem Code realisiert. Sein Aufbau ist nicht näher erläutert. 
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Platten- 
datei(en) 


BERS) COBOL-Programme, die hier 
gezeigt werden 


SC . Verarbeitung und Zugriff auf Dateien 

E (SHARED CODE) 

Verbindungs- 
aufbau 


und 
_ Verwaltung 


Zeilen-Datenstation 
Daten- 
sicht- Schreibstation 
station | 


Bild 4-7 Einfaches Auskunftssvstem 
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4.1.3.1 


4.1.3.2 


Ubermittlung von Dateien im Rechner-Rechner-Verkehr 
Uberblick 


Der Inhalt einer Datei soll zu einem anderen, über das Datenkommunikationssystem 
TRANSDATA angeschlossenen Verarbeitungsrechner übermittelt werden (siehe Bild 4-8). 


Verarbeitungsrechner A Verarbeitungsrechner B 


Verbindung 


Quittungen 


Bild 4-8 Rechnerverbund 


Aufgabe des Senders 


Um den Ablauf zu zeigen, mag es genügen, den Sender der Daten zu skizzieren. Bei jedem 
Ablauf soll neu festgelegt werden 


— welche Datei übermittelt werden soll und ihre Attribute, 
— welcher Kommunikationspartner die Daten bekommen soll, 
— das geforderte Kennwort zum Verbindungsaufbau. 


Das Programm soll im Teilnehmerbetrieb gestartet werden, nachdem per /FILE- bzw. 
/CONN-Kommando die vorgenannten variablen Daten eingegeben wurden. Dem Partner 
wird als Verbindungsnachricht der Name und die Seitenanzahl der Datei mitgeteilt. 


Die Datei wird Block (Halbseite) für Block gelesen und übertragen. Für jeden Block wird 
eine Transportquittung angefordert und der nächste wird erst übermittelt, wenn die 
positive Quittung empfangen wurde. Ggf. wird das Senden eines Blocks bis zu dreimal 
wiederholt. Sollte dann die Übermittlung noch nicht gelungen sein, wird sie abgebrochen 
und das Programm beendet. 

Die Rückmeldung wird nach jedem Aufruf überprüft; bei Fehlern wird sie an die 
Datenstation ausgegeben. 
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4.2.1.1 


Komplexe Einsatzfälle 


Ein- und Mehrschritt-Dialog mit Zeilen-Datenstation 
Stellung in einem Auskunftssystem 


Die schon im Abschnitt 4.1.2.1 skizzierte Lösung der Teilaufgabe in einer Anwendung 
"AUSKUNFT” wird um die Möglichkeit erweitert, Dialoge in mehreren Schritten zu führen. 


Dies erfordert: 
— Steuern der Warteschlangen-Zugriffe und 
— Speichern von Zwischenergebnissen einzelner Dialogschritte. 


Zunächst wird auf die empfängerglobale Warteschlange zugegriffen. Aus der 1. Eingabe 
sei ersichtlich, ob der Dialog in weiteren Schritten fortgesetzt werden soll. Ist dies der Fall, 
wird beim Senden der Antwort die absenderspezifische Warteschlange eingestellt, so daß 
die Zugriffe nunmehr gezielt auf Nachrichten des einen Partners erfolgen können, bis der 
Dialog beendet ist. Danach wird wieder die empfängerglobale Warteschlange eingestellt, 


so daß einerseits Nachrichten auch anderer Partner empfangen werden, andererseits 


Nachrichten des letzten Dialogpartners für einen neuen Dialog. 


Solange ein Mehrschritt-Dialog ausgeführt wird, werden nur Nachrichten dieses Partners 
angenommen. Die übrigen Partner werden durch weitere Prozesse dieser Anwendung 
bedient, die vom gleichen Programm gesteuert werden. Es wird zu diesem Zweck 
mehrfach geladen. Die Prozeßsteuerung des BS2000 sorgt für den simultanen Ablauf. 


Für das Speichern von Zwischenergebnissen dient eine Tabelle, die mit Spezialindizierung 


(siehe 'COB1-Beschreibung') angesprochen wird. Die maximale Anzahl der Dialogschritte 


und die konstante Länge der Zwischenergebnisse ist bekannt. Das Bild 4-7 und das 
folgende Bild 4-9 geben einen Überblick. 
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Warte- Prozefispezifische SHARED 
schlangen Programmteile CODE 


Beginn eines neuen Dialogs: 


VRECEIVE 


Verarbeitung 


wenn Einschritt-Dialog: 
VSEND, 
CA-Zustand einstellen 


und neuen Dialog beginnen; 
sonst Mehrschritt-Dialog beginnen 


VSEND, 
CS-Zustand einstellen 


VRECEIVE und 
CS-Zustand bestàtigen 


Verarbeitung 


wenn Dialogende- oder abbruch: 


VSEND, 
CA-Zustand einstellen und 


neuen Dialog beginnen; 
sonst Mehrschrittdialog fortsetzen 


Datei(en) | 


Bild 4-9 Einschritt- und Mehrschrittdialog 
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ሬ 4.2.2 


4.2.2.1 


Verwaltung einer DCAM-Anwendung 


Nachdem bereits in anderen Beispielen gezeigt wurde, wie Dialogverarbeitung aussehen 
kann, soll nunmehr das Augenmerk auf Steuerfunktionen gerichtet werden, die innerhalb 
einer mehrfach benutzbaren DCAM-Anwendung erforderlich sind. 


Stellung in einer Anwendung ''BUCHUNG' 


Eine DCAM-Anwendung, die beispielsweise Buchungsaufgaben unterschiedlicher Art 
ausfuhrt, kann bestehen aus: 


— einem Programm, das den Primärprozeß steuert und in der Hauptsache die Verwaltung 
der Anwendung realisiert (Verbindungen, Verteilcode-Zuordnung usw.) 


— unterschiedlichen Programmen, die Sekundärprozesse steuern und spezifische Teilauf- 
gaben aus der Gesamtaufgabe "BUCHUNG” erfüllen, z.B. Bestandsfortschreibung, 
Kontokorrent, offene Posten usw. 


Folgendes Bild 4-10 veranschaulicht den Aufbau. 


BESTAND" | | .KONTk“ „OPOST" 


e Datenuber- e Datenuber- e Datenuber- 
mittlung mittlung mittlung 

e Bestands- e Konto- e Offene- 
fortschreibg. korrent Posten 


Daten-Kommunikationssvstem 


des Daten-) der ubrigen 
Svstemverwalters stationen) Teilhaber an 
„BUCHUNG 


Bild 4-10 Buchungssystem mit Aufgabenaufteilung 


Die Funktionen des Primärprozesses sollen von einem Verwalter steuerbar sein. Er arbeitet 
mit einer Datenstation, deren Nachrichten nur dem Primärprozeß übermittelt werden. Der 
Verwalter hat die Aufgabe: 


— Informationen über die Anwendung und Partner abzufragen. 

— die Anzahl der möglichen Kommunikationspartner festzulegen. 

— den Abbau der Verbindung zu einem spezifischen Partner zu verlangen. 
— neue Verteilcodes einzuführen. 

— eine bestimmte Verarbeitung vorübergehend anzuhalten. 


Der Verwalter ist nicht ständig mit dem Primärprozeß verbunden. Vielmehr schaltet er sich 
fallweise an. 
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4.2.2.2 


Aufgaben des Verwaltungsprogramms 


Das Programm, das den PrimàrprozeB steuert, realisiert somit 
— den Dialog mit dem Svstemverwalter. 

Ferner hat es die Aufgabe, 

— die Verbindungen auf- und ggf. abzubauen. 


— zu prufen, ob der anfragende Partner zur Kommunikation mit dieser Anwendung 
geeignet und berechtigt ist. 


— ggf. die Anwendung in den STOP-Zustand zu setzen, falls der Verwalter es wünscht 
bzw. den START-Zustand wiederherzustellen. 


— jeder Verbindung Verteilcodes zuzuweisen. 

— evtl. neue Verteilcodes den Verbindungen zuzuordnen. 

— die Verteilcodes den Verteilungsnamen der einzelnen Sekundärprozesse zuzuordnen. 
— Verteilcodes einer Verbindung zu ändern. 

— alle Nachrichten zu bearbeiten, deren Verteilcode nicht zugeordnet worden ist. 


— Verteilcodes und Verteilungsnamen zu trennen, wenn eine bestimmte Verarbeitung auf 
Anforderung des Systemverwalters unterbrochen werden soll (dem Sekundärprozeß 
wird zeitweise keine Nachricht zugestellt.). 


Jeder Kommunikationspartner gibt beim Verbindungsaufbau in der Verbindungsnachricht 
an, welche Teilaufgabe er lösen will. Daraufhin werden dieser Verbindung die 
entsprechenden Verteilcodes zugeordnet, die auf das Programm zeigen, das die Aufgabe 
bearbeitet. Verteilcodes sind die 3 ersten Zeichen, die bei jeder Anfrage eingegeben 
werden. Die Buchungssätze adressieren somit die Programme, in denen sie verarbeitet 
werden. 


Die Codes 
” BAB”, TBCD". "BFX", "BLX" adressieren ”BESTAND” ; 
”KZE”, "KFM”, "፪ጸፐ" adressieren 'KONTK'; 
OTF, TOPU”, TOOLS. TONN” “ጻድ adressieren "0ኮ05ፐ". 


In dem hier geschilderten Fall kann für Verteilungsname, Programmname und Name der 
Verteilungsstruktur der gleiche Name verwendet werden. 


Will der Benutzer einer Datenstation von der Bearbeitung einer Teilaufgabe zu einer 
anderen überwechseln, erreicht er dies durch die Eingabe eines bestimmten Codes 
("NEU"), der dem Primärprozeß zugeordnet ist. Dort wird dann die Umschaltung 
durchgeführt und ihm bestätigt. Es ist der einzige Code, mit dem er auf das 
Verwaltungsprogramm zugreifen kann. Codes, die nicht zugeordnet sind oder die falsch 
sind, werden zwar auch dem Primärprozeß übergeben, führen aber dort lediglich zu einer 
Fehlermeldung an den Absender. 


Tabelle 4-1 zeigt die gültigen Codes, die dem Primärprozeß zugeordnet sind. 
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"VV?" Abfragen Anzahl der verbun- YINQUIRE 
denen und zur Verbindung auf- | “TOP” 
fordernden Partner 


"VN?" Abfragen Adressen der Tabelle der Partner 
Kommunikationspartner 


“VCL” Partner— und | Abbau der Verbindung zu einem | YSEND; 
Prozessorname| bestimmten Partner mit vorhe- YCLSCON 
riger Ankündigung 


"VZ?" Abfragen des Zustands der YINQUIRE 
eigenen Anwendung ” APP” 


"VZU” (ee Einstellen des Zustands der VSETLOG 


Anwendung 
'STOP' 


“VC?” Partner- und | Abfragen der Verteilcodes, die} Verteilungsstruktur 
Prozessorname| einer Verbindung zugeordnet 
Sind 


“ሃር0” Partner— und Einführen neuer Verteilcodes YCHANGE 
Prozessor- für eine Verbindung 
name; 
neue Codes 


"VTR” | Verteilungs- | Trennen eines Verteilungs- YFORBID 
name namens von einer Verteilcode- 
Gruppe (Sekundärprozeß 
abtrennen) 


“VAN” Verteilungs- Zuordnen eines Verteilungs- VPERMIT 
name namens zu einer Verteilcode- 

Gruppe (Sekundärprozeß 

anschließen) 


"Vrx" | Verwalter-Dialog beenden YCLSCON 


'NEU' | Verteilungs- | Einer Verbindung neue Verteil-| YCHANGE 
name codes zuordnen (Partner- und 


Prozessorname laut Absender) 


Tabelle 4-1 Verteilcodes eines Verwaltungsprogramms 


Der prinzipielle Ablauf des Verwaltungsprogramms ist im Bild 4-11 gezeigt. 
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1. Zuordnen des Verteilcodes: 


2. Verbindungsaufbau: 


3. Verwalterdialog: 


Bild 4-11 Verwaltungsprogramm 
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ል.1 


Anhang 


Aufbau der Datenstrukturen 


Aufbau der Anwendungsstruktur Verwendung 


Muster für Stufennummern, |PICTURE- 
Datensatz-und Datennamen |Klausel 


Pm me coe ~ | 
Pome ሠ ርጋ ገባ ~ | 


Versorgung |Kurzbeschreibung 
1) 


01 APP-NAME 


02 APPNAME 
02 PRONAME 
02 LINK 


02 LINKMOD 


02 LOGPASS 


25 ርጋ የ3 EE የምን ee 
63 CH ም” sl DI CO -< 


anwendungs- Name der DCAM-Anwendung e 
name 2] x 
prozessor- |Name des eigenen Prozessors ES 
name ደ 
vertei- Name der Verteilcode-Verwendung - 
lungsname › 
kettungs- jKettungsname l 
name x 
i - 
'TEM' 


kennwort 2 |Anwendungskennwort (Vorgabe) x 


Anwendungskennwort (Angabe) 


permanente oder temporäre Über- 
nahme der CLT-Einträge in der 
Anwendungsstruktur 


02 VERIFY Primärprozeß (=PRIMARY) 
Sekundärprozeß (=SECONDARY) 
keine Prüfangabe (=ND) 

02 ATTR. 


mehrfach benutzbar (-SHARE) 


03 LOGON 


o Fe 


einfach benutzbar (-NSHARE) 


Annahme (-LOGON) Von Auf- 
forde- 
keine Annahme (-NLOGON) rungen 


ni 
z = 
= -<< 
= m 
= ጋ 
= 


Verteilcode-Verwendung (=DISCO) | 
keine Verteilcode-Verw. (=NDISCO) | 


Quittungen an Primärprozeß 
(=PRIMTASK) 
Quittungen an anford. Prozeß 
(-REQTASK) 
keine Quittungen (-NOTACK) 
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02 FOBK SYNCHRONIZED. Ruckmeldefeld 


Rückgabecode 
Fehlercode 


1) ከ8 auf die angegebene Ausnahme sind alle Eintragungen wahlweise, einige nur unter 
bestimmten Voraussetzungen 


2) kein wahlweiser Eintrag 


Eintrag des Benutzers 
+ | Eintrag von DCAM (Rückgabe) 


je nach Verwendung entweder Eintrag des Benutzers oder Eintrag von 
DCAM (Rückgabe) 
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Aufbau der Befehlsstruktur Verwendung 


Muster für Stufennummern, |PICTURE- 
Datensatz-und Datennamen |Klausel 


Ea 


Yom oD On ~< 
a a CH 


Versorgung |Kurzbeschreibung 


 :ከ፳:222፳=2፡፳8 
= CO CH ርቲ ም ሮጋዓ -““ 
ERITREA << 


. 
01 BEF-NAME. 
02 TOVAL PIC 9(4) | | [0<በ 
COMP. E || 
PIC 9(4) |(O<nummer JLaufnummer der Ausgabenachricht 
COMP. <9999) 


በመ. ` OPTCD. Angaben zur Befehlsausführung ` zur Befehlsausführung | 
7 
er m 
"YES" 
ia | 
"YES" Aufruf wartet (=Q) 
paip Aufruf wartet nicht (=N0) i 
be Annahme (-ACCEPT) S 
WÉI — (=ACQUIRE) 
ምጅ STOP-Zustand l-STOP) at 
ጋ (=START) | 


ጩጨ Wartezeit 


Ma Partner (-SPEC) 


beliebiger Partner (-ANV) 


absenderspezif. Warteschlange 
(=CS) . 

empfangerglobale Warteschlange 
(=CA). 


03 STP 


Teilnachricht (=ELEMENT) 
Untergruppe (=SUBGRUP) 
Gruppe (=GROUP) 

03 NORMAL normale Prioritat (=NORMAL) 


hohe Prioritat (=EXPRESS) 


03 TRUNC Rest abschneiden (=TRUNC) 
Rest aufheben (=KEEP) 
Einstellung in CONN-NAME 
(=CCBTK) 


03 TACK Transportquittung (=TACK) 


keine Transportquittung (=NTACK) 


03 BELL akustischer Alarm (=BELL) 
kein akustischer Alarm (=NBELL) 


formatierte Ein-/Ausgabe mit FHS 


formatierte Ein-/Ausgabe ohne FHS S 
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ል1-4 


Aufbau der Befehlsstruktur 


Muster für Stufennummern, |PICTURE- 
Datensatz-und Datennamen |Klausel 


Versorgung |Kurzbeschreibung 


| የጣካመሁኩላርገ ርጋ m 22 -< 


02 FOB SVNCHRONIZED. 


03 ASEQNO PIC 9(4) 
CONP. 
03 TACKNO ` ` JPIC9(4) 
COMP. 
03 ARECLN PIC 9(4) 
COMP. 
03 FOBK. 
04 RCD PIC 9(4) 
COMP. 
PIC 9(4) 
COMP. 
PIC 9(4] 
CONP. 


03 REASON REDEFINED 
FDBK. 


04 LOSCON-REASON. | PIC 9(4) 
COMP. 


Laufnummer der empfangenen 
Nachricht 

Laufnummer der quittierten 
Nachricht | 
Länge der empfangenen Nachricht 
oder des aufgehobenen Rests 
Rückmeldung 

Rückgabecode 

Fehlercode 

— o 
Ruckmeldung Uber Verbindungsabbau 


Re 
a 3 SVN PIC X(3). a synchrone Verarbeitung (=SYN) 
COMP. a asynchrone Verarbeitung (=ASY) | 
RK FILLER 


02 FILLER Bi ` 


1) Alle Einträge des Benutzers sind wahlweise, einige allerdings nur unter bestimmten 


Voraussetzungen 
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Aufbau der Verbindungsstruktur 


ዘዘ 
ዩዩ 
dc 
olf 


Muster für Stufennummern, | PICTURE- 
Datensatz-und Datennamen |Klausel 


Versorgung |Kurzbeschreibung 


Datensatznane . 


partner- [Name des BR... E 1 E _ 
name ; | ሂ Si 
ው . Pre ug erem ` Pr Prozessornane des Partners Prozessornane des Partners Partners MER 
02 PASSWORD pre wat. kemwort 4 |Verbindungskennwort (Angabe) | Verbindungskennwort (Angabe) . | (Angabe) 


02 LINK kettungs- |Kettungsname 
name S 
02 LINKMOD is Permanente oder temporäre Über- ። S 
nahme der CLT-Eintràge in die 
zg Verbindungsstruktur 
02 DEPROT Datenübermittlungsprotokoll 
(-USER) 


am. ad EDITIN. Nachrichtenaufbereitung Nachrichtenaufbereitung (Eingabe) | 


# PHY” 
"LIN" 
"FOR" 


he | 
bel 
ing 


E TRANSF ohne logische Datenstation Bene ሄ 
Zeilen-Datenstation (-LINE) 


Format-Datenstation (-FORM) 


Rückwärtsschritt (=GETBS) 


keine Behandlung von R. 


(=NGETBS) | 


der logische Funktionstastencode 
einer Datenstation ist das 1. 

Zeichen der Nachricht (-GETFC) 
wird nicht übergeben (-NGETFC) 


03 LCASE Kleinbuchstaben (=LCASE) 


nur Großbuchstaben (=NLCASE) 


Nachrichtenaufbereitung (Ausgabe) 


ohne logische Datenstation (=PHYS) 
Zeilen-Datenstation (=LINE) 
Format-Datenstation (-FORM) 


02 EDITOUT. 


03 TRANSF 


03 HCOPV mit Druckausgabe (-HCOPV) 


= 
bel 


het 


ohne Druckausgabe (-NHCOPV) 


alle logischen Zeilen einer 
Nachricht werden als Einheit 
behandelt (-HOM) S 
jede einzelne logische Zeile wird | 
als Einheit betrachtet (=NHOM) SS 


02 EDIT Behandlung vom Benutzer (-USER) 


Behandlung vom Svstem (-SVSTEM) 
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Aufbau der Verbindungsstruktur 


Versorgung |Kurzbeschreibung 
1) 


Nachrichtenbehandlung 


pe Reste wegwerfen (=TRUNC) 


Muster für Stufennummern, |PICTURE- 
Datensatz-und Datennamen (Klausel 


 ጠመጩ፦መ=፦< 


02 PROC. 


03 TRUNC 


Reste aufheben (-KEEP) 


03 SVSCODE "YES” Übersetzung in EBCDIC (=SYSCODE) 
EH EM Ce | keine Übersetzung (=BINARY) 
03 APPSTART "YES" Beginn durch Anwendung (=APPSTART) 
MT TAI beliebiger Beginn (-ANVSTART) | 


02 MAXLN PIC 9(4) 
COMP. 
02 PTNCHAR. 
03 PTNTVPE PIC 9(4) 
COMP. 


03 DEVTVPE PIC 9(4) 
COMP. 


03 CHARSET PIC 9(4) 
COMP. 
PIC 9(4) 
COMP. 


02 EDITOUTI. 


03 EXTEND 


maximale Nachrichtenlänge 
Partnercharakteristika Teil 1 


Art des Partners 
Gerätetyp (wenn Datenstation) 


Zeichensatz der Datenstation 
Zusatzgeräte an der Datenstation 


Nachrichtenaufbereitung 


Ausgabedaten sind geschützt 
(=EXTEND) ; 
nicht geschützt (=NEXTEND) 


a SG 


= 


"N0” 


03 LOGC “YES” logische Steuerzeichen werden aus- 
| | gewertet (-LOGC); 
"ከ0" nicht ausgewertet (=NLOGC) 
109. logische Quittung wird angefordert | 
| (-LACK); | 
nicht angefordert (-NLACK) 


03 FILLER 


02 PROC1. 


03 SIGNAL 


03 FILLER 
02 FILLER 


) Alle Einträge des Benutzers sind wahlweise, einige allerdings nur unter bestimmten 
Voraussetzungen 


Nachrichtenbehandlung 


GO-SIGNAL wird gegeben (-SIGNAL); 
nicht gegeben (=NSIGNAL) 


ajy 


"ከ0" 


— 


—— 


— 
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Aufbau der Verteilungsstruktur 


Muster für Stufennummern, |PICTURE- |Versorgung |Kurzbeschreibung 
Datensatz-und Datennamen |Klausel 


m <zHm CH m 22 < 


m =23 ፦4 == E Z Fi < 
mn 


num ` VTLG-NAME 


PIC 9(4) | (O<lange<9) |Länge des (der) Verteilcodes 
COMP. 


PIC 9(4) | (0<position|Position des Codes in der 
COMP. <256) Nachricht 


9808 — 0 FILLER 


ER "3 CODEGRNO ell 9(4) |(O<anzahl [Anzahl angeschlossener Gruppen 
COMP. 9) 


| 02 CODESROUP OCCURS 8 TIMES. CODEGROUP OCCURS 8 TIMES. Verteilcode-Sruppelni ..ፒ | 


un rend. CODENAM gruppen- == Gruppenname 
name 
03 CODENO PIC 9(4) | (O<menge<9) |Menge der Codes in der Gruppe ፡ 
COMP. | 


03 CODEVAL PIC X(8) Codewerte : S 
TIMES. ፪ 


1) Alle Einträge des Benutzers sind nicht wahlweise 
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Aufbau der Wartestruktur 


Muster fur Stufennummern, | PICTURE- 
Datensatz-und Datennamen |Klausel 


Y 
5 
E 
T 
L 
0 
ዐ 


Versorgung jKurzbeschreibung 


01 WAIT-NAME. 


02 LIFETIM PIC 815) 
COMP. 
02 FILLER 


02 DCAM-RETURN- 
INFO. 


03 RETCODE. 
04 WAIT-RC. 

PIC 9(4) 

COMP. 


Wartezeit in Sekunden 


Rückgabeinformation 


Returncode 


Rückgabefeld 
Rückgabefeld 


Ereignis 


COMP. 


04 FILLER mun. 
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© A.2 Formate der CALL-Aufrufe 


VCHANGE APP-NAME, Verbindung | Ändern von Eigenschaften einer 
CONN-NAME, bereits aufgebauten Verbindung 
VTLG-NAME. 

YCLOSE APP-NAME. Schließen einer DCAM-Anwendung 
YCLSCON APP-NAME, Verbindung | Rücknahme einer Aufforderung oder 
CONN-NAME. logischen Verbindung 

YFORBID APP-NAME, Datenüber- | Aufhebung einer Zuordnung eines 


VT-NAME. mittlung Verteilungsnamens (DISNAME) zu 
einer Verteilcode-Gruppe 


YINQUIRE FUNKTION, Existenz Abfrage von Informationen über 
APP-NAME, Anwendungen und log. Verbindungen 
CONN-NAME, Verbindung 
BEREICH. 


፦ VOPEN APP-NAME Existenz Eröffnen einer DCAM-Anwendung 
| [, DCAMVER] . 


YOPNCON APP-NAME, Verbindung | Aufbau einer logischen Verbindung 
CONN-NAME, 
BEF-NAME 
[, VTLG-NAME] 
I,BEREICH J. 

VPERMIT APP-NAME, Datenüber- | Zuordnung des Verteilungsnamens 
VT-NAME, mittlung (DISNAME) zu einer Verteilercode- 
VTLG-NAME, Gruppe 
CG-NAME. 

YRECEIVE APP-NAME, Datenüber- | Empfang einer Nachricht, 


CONN-NAME, 
BEF-NAME, 
BEREICH, 
, FHS-MAIN-PAR 
[,BEREICH-2] |. 


mittlung Expreßnachricht oder Transport- 


quittung 


| 
YREJLOG APP-NAME, Verbindung | Zurückweisen einer Verbindungs- 
© CONN-NAME. aufforderung 


YRESET APP-NAME, Datenüber- | Ändern des CS/CA-Zustands einer 
BEF-NAME, mittlung Verbindung 
CONN-NAME. 


YSEND APP-NAME, Datenüber- | Senden einer Nachricht oder 
CONN-NAME, mittlung ExpreBnachricht 
BEF-NAME, 
BEREICHI, 
_, FHS-MAIN-PAR 
[,BEREICH-2] |. 


YSETLOG APP-NAME, Existenz Ändern des Zustands einer 
BEF-NAME. Anwendung 


YWAIT WAIT-NAME, asynchrone | Warten auf Eintreffen eines 
APP-NAME, Verarbeit. Ereignisses 
CONN-NAME, 


BEF-NAME, 
EHS MAIN. PAR 
[,BEREICH-2] 
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ል.3 


Grenzwerte für asynchrone Aufrufe 


In DCAM gelten die folgenden Grenzwerte für die Anzahl gleichzeitig offener asynchroner 
Aufrufe: 


— 8 YOPNCON (ACQUIRE) pro Anwendung. 

— 8 YOPNCON (ACCEPT, ANY) pro Anwendung. 

— 8 YOPNCON (ACCEPT, SPEC) pro Anwendung. 

— 8 YRECEIVE (SPEC) pro Verbindung. 

— 8 YRECEIVE (ANY) pro ProzeB jeder Anwendung. 

Gleichzeitig gelten fur DCAM-COBOL-Programme folgende Grenzwerte: 


Pro Prozeß sind maximal 24 asynchrone Aufrufe gleichzeitig möglich, davon maximal 16 
YOPNCON. 


Asynchrone Aufrufe sind: 
— YOPNCON mit SYN="NO”. 
— YRECEIVE mit SYN — 'NO'. 


— YSEND nach einem Returncode 'Wait for Go” bis zum Eintreffen des GO-Signals. 
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ል.4 


Rückmeldungen 


Nach jedem CALL-Aufruf wird eine Rückmeldung erzeugt und von DCAM zurückgegeben. 
Sie steht 


— in der Anwendungsstruktur: YOPEN, YCLOSE, YCLSCON, YCHANGE, 
YINQUIRE, YPERMIT, YFORBID, YREJLOG 
— in der Befehlsstruktur ` - VOPNCON, VSEND, VRECEIVE, YSETLOG, YRESET 


— in der Wartestruktur u. in der Befehisstruktur : YWAIT 


Hinweis 


Tritt ein Rückmeldecode auf, der nicht in der Tabelle beschrieben ist, handelt es sich 
um einen original DCAM-Rückmeldecode. 


Aufruf 
wurde 


ausge- kein Fehler aufgetreten 


führt 
Prozeß ist Primärprozeß 
Prozeß ist Sekundärprozeß 


Zusatzinformation zur empfangenen 
Nachricht oder Transportquittung 


angenom- | der asynchrone Auftrag wurde ange- 

men nommen 

ausge- Warnung, da Aufruf u.U. nicht voll- 
führt ständig ausgeführt 


zurück- aktueller Zustand der DCAM-Anwendung 


gewiesen | erlaubt keine Ausführung 


zurück- aktueller Zustand des Partners erlaubt 
gewiesen | keine Ausführung 


Grund bzw. 
Erläuterung 


zl mo m = < 


zurück- aktueller Zustand des Zugriffssystems 
gewiesen | (DCM) erlaubt keine Ausführung 
zurück- unzulässiger Gebrauch 

gewiesen 

zurück- fehlerhafte Datenstrukturen 

gewiesen 

zurück- DCUS-Fehler 

gewiesen 

zurück- Systemfehler 

gewiesen 


ሬም: 891 1.6.1 1፡፡ ED BEER ET TITTEN 
WIS 1 MOM It ee | . ፡ጉ፡ |. %፣ መመመ. 
RW ወው! 81] ጩ! 8፡1: 2 በ! ፡.. 1... ፤: EEE መ በከ ስድ 


zurück- kein DCAM-Ereignis 
gewiesen 


1) Anzeige bei Datenüberlauf 
2) Quittungs-/Gruppierungsanzeige 
3) Fehlercode 


Weitere Erläuterungen werden in den folgenden Tabellen gegeben. 
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Rückmeldung 


0 


= የኻ "2 ርጋ < 


> 
e 
— 
= 
ፎ 
፦ 


ME ለኔ. ፌር a ፡............፡.!........ 1... ፡ሎ፤1 TTIE coe | 
ርክ አይ EEE ED EGE A EEE ETF ee . E E ያ ፥ | ! ፡ ER BEER EN EN EEE BET RESET 
ፌክ RER EEE SE ER Re RE: RIED E EEE U RE IR RR ER US e ER SE OJ 1. 11፡2 ! BO BETEN ER 
We, Vereen een aaa ESE RP ren ok 7 4... 1... RE ET RS SY ER EEE BEER DEE Ee GE (REG |] Ee 


BER BES BE Par BR A RN OS WER EE ee EI EU EB FI EI TUT DI 
SERS a. LANE ae ለ ር RE NIE RR A See DEE ፌፌሔ..ቭ. ን  ፡..”.፣፡ :፡.፡ ፡... 2... | BE Eu LI 


Bedeutung 


Aufruf erfolgreich beendet 


Prozeß ist Primärprozeß der DCAM- 
Anwendung 
Prozeß ist Sekundärprozeß 


Nachricht überschreitet nicht die für den 
Empfangsbereich angegebene Länge 


GO-Signal für Nachrichten ist eingetroffen 


GO-Signal für Expreß-Nachricht ist eingetroffen 


Nachricht ist länger als erwartet; Rest wurde 
gelöscht (TRUNC=YES) 


Nachricht ist länger als erwartet; Rest wurde 
aufbewahrt (TRUNC-NO); 


Restlänge im ARECLN-Feld 


Transportquittung — positiv 


Transportquittung — negativ 


Element 
Datengruppierung 
Untergruppe einer Normalnachricht 


Element 


Notengruppierung 
Untergruppe einer Expreßnachricht 


Aufruf mit Warnung beendet 


Widersprüche in der Datenverschlüsselung 
(BINARY/SYSCODE) 
x) wie für RCD=0 


keine Eingabedaten vorhanden (ከ0) 


keine Aufforderung zum Verbindungsaufbau in der 
Warteschlange 


Aufruf wegen Zeitablauf beendet (Q und TOVAL) 


Verlust von Daten wegen (System-) 
Zeitablauf 


in einer Warteschlange stehende Aufforderung, zum 
Verbindungsaufbau annulliert wegen (System-) 
Zeitablauf 


Verbindungsnachricht abgeschnitten 
Fehler in der Nachrichtenaufbereitung 


Partnercharakteristika wurden nicht vollständig 
übergeben 


Ausgabe wurde gekürzt (aufbereitete Nachricht war 
zu lang) 


ungültige Angaben für Nachrichtenaufbereitung 
(Änderung wurde nicht ausgeführt) 


Warnung bei Formatbehandlung durch FHS, Formatie- 
rung abgeschlossen (siehe FHS-Returncode) 


Warnung bei Formatbehandlung durch FHS, Formatie- 
rung nicht abgeschlossen (siehe FHS-Returncode) 
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Aufruf 


Rückmeldung 


BEN: gn 228 RE! TE eme ርሽ. RE A ee ee ee eS ee eee ee vom 
MT er RCT ኤኤ. ERS Sk eet are EE eS ምም ee Ce NINE 
ኢኢ ATS KC RNR ER ET. 1. WE ist Gy ER VOS Ce ey L-BELT በመክጨጨጠጩና፦፣ 


Bedeutung 


= mm "DO -< 


Aufruf zurückgewiesen wegen des aktuellen 
Zustands der DCAM-Anwendung 


DCAM-Anwendung vom aufrufenden Prozeß nicht 
eröffnet 


DCAM-Anwendung bereits eröffnet 
(SHARE="NO” nicht möglich) 


DCAM-Anwendung bereits eröffnet und einfach 
benutzbar (NSHARE) 


Prozeß hat diese DCAM-Anwendung schon eröffnet 


DCAM-Anwendung bereits eröffnet 
(VERIFY="PRM” nicht nochmals möglich) 


DCAM-Anwendung noch nicht von einem Primärprozeß 
eröffnet (VERIFY="SEC” nicht möglich) 


Primärprozeß hat die DCAM-Anwendung geschlossen 
Warnung: Erzwungenes Schließen der DCAM-Anwendung 


erzwungenes Schließen der DCAM-Anwendung 


erzwungenes Schließen der DCAM-Anwendung 
wegen DCAM-Fehler 


erzwungenes Schließen der DCAM-Anwendung wegen 
Beendigung des Primärprozesses 


Sekundärprozeß hat die DCAM-Anwendung geschlossen 


Verteilungsname/Verteilcode-Gruppenname sind 
schon zugeordnet 
(keine weitere Zuordnung erlaubt) 


ungültiges Kennwort (USEPW) 


für diesen Prozeß wurden zuviele Aufrufe gleichen 
Typs gleichzeitig gegeben 
(maximal 8 erlaubt) 


DCAM-Anwendung ist nicht aktiv 


N 
N 


Falsches Kennwort 
76 Prozeß hat zu viele Anwendungen eröffnet 


Prozeß hat zu viele nicht vordefinierte Anwen- 
dungen eröffnet 


ungültiges RDF-Kennwort 


œ 


die Anwendung ist bereits von einem anderen 
Subsystem eröffnet 


es wurden zu viele nicht vordefinierte Anwen- 
dungen eröffnet 


zu viele Verbindungen von nicht vordefinierter 
Anwendung eröffnet 


die DCAM-Version DCAMVER des Sekundärprozesses 
stimmt nicht mit der des Primärprozesses überein 


MA 55298 E ET 8296: 5:98"! ER CC 5280: AT SPES GEE E ee 2295 7: 22:3: a SO ፡ ::፡ CH 
Wee ይ ሠ PECENE mee E E vn Gë 4... ፣ ፡፡፡ ....፡ ሼከ” ፪ሻ..ን፡::ንፕ OO ም ፡:1 ድ). DOT CH 
MEL HER: KARU a See? PE ለ Ae ይ... ዳ 1. ይ. 1 ተያ EI EE DRAN AE SE ENEE De: CA Ge CH 
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Rückmeldung Aufruf 


Bedeutung 


Aufruf wegen aktuellem Zustand des Partners 
zurückgewiesen 


Partner ist mit der DCAM-Anwendung nicht 
verbunden 


Partner ist mit der DCAM-Anwendung bereits 
verbunden 


Partner hat Verbindungsaufforderung geschickt 
(kein ACCPT-'NO' möglich) 


Angabe der Verteilungsstruktur fehlte 
(DCAM-Anwendung mit DISCO) 


Verbindung wurde durch einen Aufruf des Benutzers 2 
bzw. YCLSCON abgebaut 


das Warten auf das G0-Signal wurde wegen Abbau 
der Verbindung beendet 


erzwungene Unterbrechung der Verbindung oder 
Abbau durch den Partner 


Verbindung wurde von einem anderen Prozeß in den 
CS-Zustand gesetzt (kein SPEC="YES” von diesem 
Prozeß möglich) 


Verbindung ist im CA-Zustand 
(kein SPEC-'VES' möglich) 


für die nochmals angegebene Laufnummer (SEQNO) 
ist die vorher erwartete Transportquittung noch 
nicht eingetroffen 


unerlaubte Kombination von Datenübermittlungs- 
protokoll (DEPROT) mit Nachrichtenaufbereitung 
(EDIT) 


Systemzeitablauf für Aufforderung zum Verbin- 
dungsaufbau 


Partner nicht erreichbar (z.B. DCAM-Anwendung, 
die nicht eröffnet ist) 


Partner bearbeitet momentan keine Aufforderungen 
zum Verbindungsaufbau 


(Anwendung im STOP-Zustand) 


Partner bearbeitet keine Aufforderung zum Ver- 
bindungsaufbau (Anwendung mit NLOGON-Attribut) 


ungültiges Kennwort (PASSWORD) 


Aufforderung vom Partner zurückgewiesen 
(keine Annahme oder YREJLOG) 


N 


ungültiges LID 


-] 
መጋ 


EN 
E ES DEE UET E ER EE, IER LEE EE SCR FREE ER ET EE E E ER E RER SA E E 
game ER EEE VL AEE ፡ጐ.1..፡፡፡1 |... ቴፒ... ! ተ EE EB E ለች... ra 
ge MARE RE, EE LE SEET EEN ERT EEE ER BEER TAON FE ET ABIT A RER E A ለ 8 
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ExpreBnachricht nicht sendbar, wenn EDIT=SYS 
eingestellt wurde 
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Partner für andere Anwendung bestimmt 

nach Verbindungsaufbau wurde die Verbindung vom 
Partner oder vom System wieder abgebaut 
Anforderung vom Partner abgewiesen: 

Syntaxfehler in der Verbindungsnachricht 
Anforderung vom Partner abgewiesen: 

unbekannter Berechtigungsname 1) 
Anforderung vom Partner abgewiesen: 

Duplikat der Anwendung schon eröffnet. 1) 
Anforderung vom Partner abgewiesen: 

falsches Kennwort 1) 


1) Diese Meldungen werden gegeben, wenn eine Aufforderung zum Verbindungsaufbau 
an die Systemanwendung 'Console' von dieser zurückgewiesen wird. 


Rückmeldung 


WEA 
TERS TEIN EEE OE et 2 SCH 
BLA GOS EI FRE ANTEIL TEE 


2 DCM-Fehler 


| 3ና 1 34 1786 ፲]። ባ.ፒ | ER RR EHE 
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ል4-6 


Aufruf Bedeutung 


Rückmeldung 


Zmoo $ 


- = ር2 የዋጋ SE D ርጋ -< 


5 | ጠር3፳>ሯ=ጃርንነ< | ር : ኞ ሙ= CC ርጋ< 
ጠርጋ < 
REECH 


Aufruf kann von einem Sekundärprozeß nicht 
gegeben werden 


Aufruf ist nicht bei einfach verwendbaren 
(NSHARE) oder mehrfach verwendbaren Anwendungen 
(SHARE), jedoch ohne Verteilcode-Verwendung 
(NDISCO) 


Annahme einer Aufforderung oder Setzen des 
Zustands der Anwendung nicht möglich, da diese 
Anwendung keine Aufforderungen bearbeitet 
(NLOGON) 


Anwendung ist nicht berechtigt, den Aufruf zu 
geben oder diese Befehls-Operanden zu verwenden 


nur wenn beide TRANSF auf 'FOR' gesetzt sind, 
wird FHS=YES ausgeführt 


FHS="YES" nicht erlaubt (EHS Modul fehlt) 


Bereich zu kurz 


fehlerhafte Verteilungsstruktur 
(Verteilungsstruktur fehlt) 


fehlerhafte Anwendungsstruktur (APP-NAME) 
(Anwendungsname (APPNAME) nicht auffindbar) 


fehlerhafte Anwendungsstruktur (APP-NAME) 
(Verteilungsname (DISNAME) nicht auffindbar) 


fehlerhafte Verbindungsstruktur 
(Partnername (PTNNAME) nicht auffindbar) 


angegebener Bereich ist fehlerhaft 
ungültiger Anwendungsname 
ungültiger Verteilungsname (DISNAME) 
ungültiger Partnername (PTNNAME) 
ungültiger Prozessorname (PRONAME) 


Wert für Laufnummer der Nachricht (SEQNO) ist 
größer als der zulässige Wert 


Bereich ist zu klein (Mindestlänge 8 Bytes) oder 
Länge des Bereichs-0 


Anzahl der Codes in einer Gruppe (CODENO) ist 
kein zulässiger Wert 


symbolischer Name der Codegruppe (CODENAM) steht 
nicht in der Verteilungsstruktur 
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Rickmeldung 


nicht behebbarer Fehler bei Nachrichtenaufberei- 
tung 

die FHS-Operandenstruktur fehlt 

(DCAMVER > V8.0 angeben) 


bei der Formatbehandlung mit FHS ist ein Fehler 


aufgetreten (siehe FHS-Returncode im Manual 'FHS' 
(Format Handling System) 


unzulässige Verteilcodelänge (CODELN) 


Grenzwert für gleichzeitig eröffnete Anwendungen 
überschritten 

Grenzwert für gleichzeitig aufgebaute Verbin- 
dungen überschritten 

Grenzwert für gleichzeitig verwendbare 
Verteilungsstrukturen überschritten 

Grenzwert für gleichzeitig verwendbare 
Verteilcode-Gruppen überschritten 


YRECEIVE (FHS=YES) wurde vor YSEND (FHS=YES) auf- 


gerufen oder der Grenzwert für die FHS-Operanden- 
strukturen wurde überschritten. 


DCUS-Modul konnte nicht nachgeladen werden. 
Common Memory Pool konnte nicht eingerichtet 
werden (kein zusammenhängender Speicherplatz) 
kein Speicherplatz zugewiesen 


Bereich für CCB’s ist erschöpft 
Bereich für RPB's ist erschöpft 


Ereignis ist nicht eingetroffen (entweder kein 
asynchroner CALL gegeben oder die Wartezeit 
(LIFETIM) ist abgelaufen). 


kein DCAM-Ereignis (z.B. fremder POSSIG) 


= የካ "0 OH < 


ፌሬ ሙይ. ይይ  ፡ ዝሬ! ከ eC . EEN በ? የጠ ፡ጨከጨ፡- 
| ርኤ ደ E.G ንብ eek 
Wo See o, em po . ደጅሽ... ‹ እ. ብ. . . ህ.፣ የ A EEE RT 
We IRS — 8 e Ke Zu OO RS ረ ብር 4. ብ. 866.7 .... Be ፡ በስ ree 


Hinweis 


Bei RCD =204 und ECD=0...255 handelt es sich um Returncodes, die im Zusammen- 
hang mit System Exits vorkommen (Systemverwaltung benachrichtigen). 


1) Die Standardwerte des Moduls VDDCUOO4 lauten: 


10 Anwendungen 

20 Verbindungen 

10 Verteilungsstrukturen (unterschiedliche CODEIDEN) 

10 Verteilungscode-Gruppen (unterschiedliche CODENAM) 
20 FHS-Operandenstrukturen 
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Diese Werte können erweitert werden durch Neugenerierung des Moduls. Dazu ist bis zur 
DCAM V8.0 der Makroaufruf (Assembler) YDDCUM04 erforderlich. Ab der DCAM V8.0 wird 
der Modul YDDCU004 implizit beim YOPEN nachgeladen. Er ist nicht mehr fest zum 
Benutzerprogramm gebunden. Die Einstellung kann nur durch den Systemverwalter 
erfolgen. Der Wert ist dann fir alle Benutzer gleich. 


Name Operation Operanden 


VDDCUMO4 C,XX,VV,ZZ,UUu,VV 


Operanden 

C muß immer angegeben werden 

xx Grenzwert für gleichzeitig eröffnete Anwendungen (0<xx< 100); Standardwert = 10. 
yy ` Grenzwert für gleichzeitig aufgebaute Verbindungen (0 < ሃሃ 100]; Standardwert=20. 


zz Grenzwert für gleichzeitig verwendete Strukturnamen (CODEIDEN) von Verteilungs- 
strukturen (0 <zz< 100); Standardwert = 10. 


uu Grenzwert für gleichzeitig verwendete Gruppennamen (CODENAM) von Verteilcode- 
Gruppen (0< uu €100); Standardwert=10. 


vv Grenzwert für gleichzeitig verwendete FHS-Operandenstrukturen (FHS-MAIN-PAR, 
ዐ <ህሃ < 100); Standardwert = 20. 


Der Quellcode des Moduls YDDCU004 besteht aus 2 Zeilen: 


VDDCUMO4 ... 
END 


Dieser Quellcode ist zu assemblieren. Der Objektmodul ist mit dem LMR in die Tasklib der 
DCAM-COBOL-Module zu bringen ($TSOS.SYSRTC.DCM). 


Meldungen 2) dieser Kategorie sollten als 
Systemfehler weitergeleitet werden. 
Ausreichende Dokumentation bitte nicht vergessen! 


WM M M M MI 
ON RH i 
FEH EE E 
To ፻፪ UR 
H DM E 
u DH IM ፐ 
(ID T 


2) Das gleiche gilt in Fällen, wo Einträge festgestellt werden, die nicht in diesem 
Verzeichnis aufgeführt sind. 
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© A.5 Partnercharakteristika 


Aufteilung und Inhalt des Feldes, das von DCAM beim Aufruf YINQUIRE (Variante 'PTN') 
ausgefüllt wird: 


Muster fur Stufennummern PICTURE- Bedeutung 
Datensatz-und Datennamen Klausel 
01 PTN-BEREICH. 
PIC 9(4) COMP.| Länge des Feldes (vom Benutzer anzugeben: 26) 
REEL. >: PTNCHAR 1. 
ee PTNTYPE PIC 9(4) COMP.| Art des Partners (DCAM-Anwendung oder 
Datenstation) 


03 GERATETYP PIC 9(4) COMP. ` er A A 
03 CHARSET PIC 9(4) COMP.| zur on EES stehender Zeichensatz 
ne  -.6 PIC 9(4) COMP.| angeschlossene Zusatzgerate 


02 PTNCHAR 2. 
03 LINE-EIGENSCHAFT. Eigenschaften der Zeilen-Datenstation 


Die möglichen Inhalte der einzelnen Felder sind in der folgenden Tabelle beschrieben. 


02 PTN-LAENGE 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-275-3 Ab -1 


AS-2 


Datenname 


PTNTVPE 


DEVTVPE 


Eintrag 
von 


DCAM 


እን 


N 
N 


N 
GA 


N 
ጐ 


N 
ጋ 


ኢን 
00 


(ል) 
ፎ 


38 


42 


43 


N 


Bedeutung 


Partner ist eine Anwendung 


Partner ist eine Datenstation 


Schreibstation 8103 

Datensichtstation X.29 (ähnlich 8150) 
Datensichtstation 8150 

Datensichtstation 8153 (ähnlich 8150) 
Intelligenter Partner 

Datensichtstation 8151 

Datensichtstation 8152 

Schreibstation 8110 

Datensichtstation 8161 mit 54 Zeichen pro Zeile 
Datensichtstation 8161 mit 64 Zeichen pro Zeile 
Datensichtstation 8161 mit 80 Zeichen pro Zeile 
Druckerstation 8121 

Schreibstation PT-80 (ähnlich 8103) 
Schreibstation T1000 (ähnlich 8103) 
Schreibstation T100 (ähnlich 8103) 
Schreibstation FS100-E (ähnlich 8103) 
Druckerstation 90037 

Druckerstation 8122 

Datensichtstation 8162 

Datensichtstation 8160 

Druckerstation 8124 

Datensichtstation 8167 (ähnlich 8160) 
APS-Programm 


Schreibstation X.29 
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Eintrag 
Datenname von 


DCAM 


CHARSET 


DEVSEC 
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Bedeutung 


Datensichtstation 9750 
Druckerstation 9003 
Datensichtstation 9770 (àhnlich 8151) 
Druckerstation 9002 
Datensichtstation 3974 
Datensichtstation 9751 (ähnlich 8160) 
Datensichtstation 9752 (àhnlich 9750) 
Personal Computer 9753 (àhnlich 8160) 
Druckerstation 9001 
Grafiksichtstation 9731 
Druckerstation 9004 
Grafiksichtstation 9754 
Datensichtstation 9749 (àhnlich 9750) 
BTX-Sichtstation T-3000 
BTX-Sichtstation Dienst editieren 
BTX-Sichtstation Dienst abfragen 


UTC für Teletex 


wird momentan noch nicht zurückgemeldet 


A5-3 


Datenname 


ZEILENLAENGE-P 


ZEILENANZAHL-P 


MAXIMALPUFFER-P 


ZEILENANZAHL-L 


ZEILENLAENGE-L 


MAXIMALPUFFER-L 


LOGDAT 


EDITIN 


EDITOUT 


Eintrag 


von 
DCAM 


f 
75 


Bedeutung 
a ist die maximale Anzahl der Zeichen, die die 
Datenstation in einer Zeile darstellen kann. 


b ist die maximale Anzahl von Zeilen, die bei 
einer Datensichtstation abbildbar sind. 


c ist die Maximalgröße in Bytes des Gerätepuffers 
der Datenstation. 


d ist die maximale Anzahl der Zeichen, die von 
der Zeilen-Datenstation als eine Zeile verarbei- 
tet werden können. 

e ist die maximale Anzahl von Zeilen, die bei 
einer Ein-/Ausgabe von der Zeilen-Datenstation 
verarbeitet werden können. 


f ist die Maximalgröße in Bytes des Puffer- 
speichers der Zeilen-Datenstation. 


Schreibstation 
Datensichtstation 
LINE 

LINE + GETBS 

LINE + LCASE 

LINE + GETBS + LCASE 
PHYS 

FORM 

FORM + GETBS 

LINE 

FORM 

PHYS 

LINE + HCOPY 


PHYS + HCOPY 
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ል.6 Kommandos für die Namen-Zuweisung 


Für die Namen-Zuweisung gibt es 2 Kommandos an das Organisationsprogramm des 
852000. Sie sind im Manual 'Kommandosprache' beschrieben. Hier folgt eine kurze 
Funktionsbeschreibung und die Darstellung des Formats. 


1. APPLICATION-Kommando 


Das APPLICATION-Kommando wird von DCAM-Benutzern verwendet, um in einer 
prozeßspezifischen Tabelle, der CLT (communication link table), Angaben über eine 
DCAM-Anwendung zu speichern bzw. zu löschen. 


Bei Eröffnung der DCAM-Anwendung durch ein DCAM-Benutzerprogramm ersetzen die 
Werte dieser Tabelle die entsprechenden Einträge im Anwendungssteuerblock ACB 
(Assembler) bzw. in der Anwendungsstruktur (COBOL). Die Verknüpfung des CLT-Einmit 
diesem Programmbereich wird durch den Kettungsnamen LINK hergestellt, der dazu 
sowohl im Kommando als auch im Programm angegeben werden muß. 


Format 
APPLICATION [anwendungsname] 
, LINK=kettungsname 
APPL | , DISNAME=verteilungsname | 
| , USEPASS=kennwort1 ] 
[ ,USEPW=kennwort2 ] 
[ , LOGPASS=kennwort3 ] 


2. CONNECTION-Kommando 


Das CONNECTION-Kommando wird von DCAM-Benutzern verwendet, um in einer 
prozeBspezifischen Tabelle, der CLT (communication link table), Angaben iber eine 
logische Verbindung zu speichern bzw. zu loschen. 


Während die Verbindung aufgebaut wird, ergänzen oder ersetzen die Werte dieser Tabelle 
die entsprechenden Angaben im Verbindungssteuerblock CCB (Assembler) bzw. in der 
Verbindungsstruktur (COBOL). Die Verknüpfung des CLT-Eintrags mit diesem Programm- 
bereich wird durch den Kettungsnamen LINK hergestellt, der dazu sowohl im Kommando 
als auch im Programm angegeben werden muß. 


Format 


CONNECTION [partnername] 
| | , LINK=kettungsname 

[ , PRONAME=prozname ] 
[,USERFLD=benutzerfeld] 
[,PASSWORD=kennwort |] 


CONN 


DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, U989-J-Z75-3 A6 - 1 


c A.7 Logische Steuerzeichen für den Line-Mode (TIAMCTRC) 


Das Copy-Member TIAMCTRC enthält logische Steuerzeichen für den Line-Mode (logische 
Zeilen-Datenstation). Es kann mit 


/COPY TIAMCTRC 


in das Anwenderprogramm kopiert werden. 


COPY TIAMCTRC 


He He He Fe He Hee He He He He He He He ee He He ee He eee He te te ee kk ee ee te te ete d te te tee te ete te te de A te ke de te te te ke 


= . 
* TIAMCTRC V801 * 
* . 


We He He Fe He Hee He He He Fe He He He ee He He ee He te ee He te kk kk te te He te te d te te te te te te de te te te ke te te te ete te te ke 
* 


01 LINE-MODE-CONTROL-CHARACTERS. 


* 


* LOGICAL RECORD DELIMITERS 
41 CC-NEW-LINE PIC 9(4) COMP SYNC VALUE 21. 
41 CC-NEW-LINE-RED REDEFINES CC-NEW-LINE. 
42 FILLER PIC X. 
42 NEW-LINE PIC X. 
41 CC-NEW-PAGE PIC 9(4) COMP SYNC VALUE 12. 
41 CC-NEW-PAGE-RED REDEFINES CC-NEW-PAGE. 
G 42 FILLER PIC X. 
42 NEW-PAGE PIC X. 


41 CC-CONT-SAME-LINE PIC 9(4) COMP SYNC VALUE 13. 
41 CC-CONT-SAME-LINE-RED REDEFINES CC-CONT-SAME-LINE. 


42 FILLER PIC X. 
42 CONT-SAME-LINE PIC X. 
41 CC-CONT-LINE-N PIC 9(4) COMP SYNC VALUE 41. 
41 CC-CONT-LINE-N-RED REDEFINES CC-CONT-LINE-N. 
42 FILLER PIC X. 
42 CONT-LINE-N PIC X. 
41 CC-CONT-COL-N PIC 9(4) COMP SYNC VALUE 42. 
41 CC-CONT-COL-N-RED REDEFINES CC-CONT-COL-N. 
42 FILLER PIC X. 
42 CONT-COL-N PIC X. 
41 CC-SHEET-FEED-N PIC 9(4) COMP SYNC VALUE 33. 
41 CC-SHEET-FEED-N-RED REDEFINES CC-SHEET-FEED-N. 
42 FILLER PIC X. 
42 SHEET-FEED-N PIC X. 
41 CC-CONT-ACT-POS PIC 9(4) COMP SYNC VALUE 32. 
41 CC-CONT-ACT-POS-RED REDEFINES CC-CONT-ACT-POS. 
42 FILLER PIC X. 


42 CONT-ACT-POS PIC X. 


D 


LOGICAL UNIT DELIMITERS 


41 CC-EMPH-LAVOUTI PIC 9(4) COMP SYNC VALUE 29. 
41 CC-EMPH-LAVOUTI-RED REDEFINES CC-EMPH-LAYOUTI. 
42 FILLER PIC X. 
42 EMPH-LAYOUTI PIC X. 
41 CC-EMPH-LAYOUT2 PIC 9(4) COMP SYNC VALUE 31. 
41 CC-EMPH-LAYOUT2-RED REDEFINES CC-EMPH-LAYOUT2. 
42 FILLER PIC X. 
42 EMPH-LAYOUT2 PIC X. 
41 CC-EMPH-LAYOUT3 PIC 9(4) COMP SYNC VALUE 19. 
41 CC-EMPH-LAVOUT3-RED REDEFINES CC-EMPH-LAYOUT3. 
42 FILLER PIC X. 
42 EMPH-LAYOUT3 PIC X. 
41 CC-EMPH-LAYOUT4 PIC 9(4) COMP SYNC VALUE 20. 
41 CC-EMPH-LAYOUT4-RED REDEFINES CC-EMPH-LAYOUTA4. 
42 FILLER PIC X. 


42 EMPH-LAYOUT4 PIC X. 
41 CC-NORMAL-LAYOUT PIC 9(4) COMP SYNC VALUE 30. 
41 CC-NORMAL-LAYOUT-RED REDEFINES CC-NORMAL-LAYOUT. 


42 FILLER PIC X. 
42 NORMAL-LAYOUT PIC X. 
41 CC-DARK-LAYOUT PIC 9(4) COMP SYNC VALUE 18. 
41 CC-DARK-LAYOUT-RED REDEFINES CC-DARK-LAYOUT. 
42 FILLER PIC X. 
42 DARK-LAYOUT PIC X. 
41 CC-PART-LINE-UP PIC 9(4) COMP SYNC VALUE 44. 
41 CC-PART-LINE-UP-RED REDEFINES CC-PART-LINE-UP. 
42 FILLER PIC X. 


42 PART-LINE-UP PIC X. 
41 CC-PART-LINE—-DOWN PIC 9(4) COMP SYNC VALUE 43. 
41 CC-PART-LINE-DOWN-RED REDEFINES CC-PART-LINE-DOWN. 
42 FILLER PIC X. 
42 PART-LINE-DOWN PIC X. 


41 CC-SECOND-CHAR-SET PIC 9(4) COMP SYNC VALUE 14. 
41 CC-SECOND-CHAR-SET-RED REDEFINES CC-SECOND-CHAR-SET. 


© 42 FILLER PIC X. 
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41 
41 


* 


41 
41 


41 
41 


41 
41 


ጁ 


41 
41 


41 
41 


41 
41 


41 
41 


A7-2 


42 SECOND-CHAR-SET PIC X. 

CC-NORMAL-CHAR-SET PIC 9(4) COMP SYNC VALUE 15. 
CC-NORMAL-CHAR-SET-RED REDEFINES CC-NORMAL-CHAR-SET. 
42 FILLER PIC X. 

42 NORMAL-CHAR-SET PIC X. 


CC-START-PROT-AREA PIC 9(4) COMP SYNC VALUE 54. 
CC-START-PROT-AREA-RED REDEFINES CC-START-PROT-AREA. 
42 FILLER PIC X. 

42 START-PROT-AREA PIC X. 

CC-END-PROT-AREA PIC 9(4) COMP SYNC VALUE 8. 
CC-END-PROT-AREA-RED REDEFINES CC-END-PROT-AREA. 
42 FILLER PIC X. 

42 END-PROT-AREA PIC X. 

CC-START-NUM-DATA PIC 9(4) COMP SYNC VALUE 17. 
CC-START-NUM-DATA-RED REDEFINES CC-START-NUM-DATA. 
42 FILLER PIG A. 

42 START-NUM-DATA PIC X. 


CC-VERT-MOVE-IND PIC 9(4) COMP SYNC VALUE 36. 
CC-VERT-MOVE-IND-RED REDEFINES CC-VERT-MOVE-IND. 
42 FILLER PIC X. 
42 VERT-MOVE-IND FIL-A. 


CC-HORIZ-MOVE-IND PIC 9(4) COMP SYNC VALUE 35. 
CC-HORIZ-MOVE-IND-RED REDEFINES CC-HORIZ-MOVE-IND. 
42 FILLER PIC X. 

42 HORIZ-MOVE-IND PICX. 

CC-LEFT-MARGIN PIC 9(4) COMP SYNC VALUE 56. 
CC-LEFT-MARGIN-RED REDEFINES CC-LEFT-MARGIN. 

42 FILLER PIC X. 

42 LEFT-MARGIN PIC X. 

CC-START-PROP-TYPE PIC 9(4) COMP SYNC VALUE 26. 
CC-START-PROP-TYPE-RED REDEFINES CC-START-PROP-TYPE. 


42 FILLER PIC X, 
42 START-PROP-TYPE PIC X. 


CC-END-PROP-TYPE PIC 9(4) COMP SYNC VALUE 27. 
CC-END-PROP-TYPE-RED REDEFINES CC-END-PROP-TYPE. 
42 FILLER PIC X. 

42 END-PROP-TYPE PIC X. 

CC-MAX-LINE-LEN PIC 9(4) COMP SYNC VALUE 51. 
CC-MAX-LINE-LEN-RED REDEFINES CC-MAX-LINE-LEN. 
42 FILLER PIC X. 

42 MAX-LINE-LEN PIC X. 

CC-MAX-LINE-NUM PIC 9(4) COMP SYNC VALUE 53. 
CC-MAX-LINE-NUM-RED REDEFINES CC-MAX-LINE-NUM. 
42 FILLER PIC X. 


42 MAX-LINE-NUM PIC X. 


SPECIAL FUNCTIONS 


CC-DELETE-CHAR PIC 9(4) COMP SYNC VALUE 7. 
CC-DELETE-CHAR-RED REDEFINES CC-DELETE-CHAR. 
42 FILLER PIC X. 

42 DELETE-CHAR PIC X. 

CC-BACKSPACE PIC 9(4) COMP SYNC VALUE 22. 
CC-BACKSPACE-RED REDEFINES CC-BACKSPACE. 

42 FILLER PIC X. 

42 BACKSPACE PIC X. 

CC-SUBSTITUTE PIC 9(4) COMP SYNC VALUE 63. 
CC-SUBSTITUTE-RED REDEFINES CC-SUBSTITUTE. 

42 FILLER PIC X. 

42 SUBSTITUTE PIC X. 

PHYSICAL UNIT DELIMITERS 

CC-PHYS-ESC PIC 9(4) COMP SYNC VALUE 39. 
CC-PHYS-ESC-RED REDEFINES CC-PHYS-ESC. 

42 FILLER PIC X. 

42 PHVS-ESC PIC X. 

CC-PHYS-DC4 PIC 9(4) COMP SYNC VALUE 60. 
CC-PHYS-DC4-RED REDEFINES CC-PHVS-DCA. 

42 FILLER PIC X. 

42 PHYS-DC4 PIC X. 

CC-PHYS-HT PIC 9(4) COMP SYNC VALUE 5. 
CC-PHYS-HT-RED REDEFINES CC-PHYS-HT. 

42 FILLER PIC X. 

42 ዞዘሃ5--ዘፐ PIC X. 

CC-PHYS-VT PIC 9(4) COMP SYNC VALUE 11. 
CC-PHYS-VT-RED REDEFINES CC-PHYS-VT. 

42 FILLER PIC X. 

42 PHYS-VT PIC X. 
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Die Steuerzeichen haben folgende Bedeutung: 


NEW-LINE 
Das logische Zeilenendezeichen wird ausgegeben und die Schreibmarke an den 
Anfang der nächsten Zeile gesetzt. Besondere Anzeigeformen werden auf den 
Normalzustand zurückgesetzt (normal, 1. Zeichenvorrat, ungeschützt). 


NEW-PAGE 
Das logische Zeilenendezeichen wird ausgegeben, eine neue Seite eingegerichtet 
und die Schreibmarke an den Zeilenanfang gesetzt. Besondere Anzeigen werden auf 
den Normalzustand zurückgesetzt. 


CONT-SAME-LINE 
Das logische Zeilenendezeichen wird ausgegeben und die Schreibmarke an den 
Anfang der aktuellen Zeile gesetzt. Besondere Anzeigeformen werden auf den 
Normalzustand zurückgesetzt (nur bei Schreibstationen und EDIT-Option OVERWRI- 
TE). OVERWRITE). 


CONT-LINE-N 
Die Schreibmarke wird auf den Anfang der Zeile n gesetzt; n wird als 3-stellige 
abdruckbare Dezimalzahl hinter dem Steuerzeichen angegeben. 
Am Ende der Nachricht wird die Schreibmarke auf den Anfang des nächsten 
ungeschützten Feldes von Beginn der Zeile n an gesetzt. 


CONT-COL-N 
Die Schreibmarke wird auf die Spalte n der aktuellen Zeile gesetzt; n wird als 
3-stellige abdruckbare Dezimalzahl hinter dem Steuerzeichen angegeben. (Das 
Steuerzeichen ist nur für Drucker gültig). 


SHEET-FEED-N 
Der Blatteinzug bzw. -auswurf am Drucker wird gesteuert: 


n=0 Blattauswurf am Nachrichtenende und bei Vorsteckeinrichtung Um- 
schaltung auf Traktor 

n=1,2,3 Blattauswurf und Blatteinzug aus Behalter n 

n=9 Blatteinzug von der Vorsteckeinrichtung (nur beim Drucker 9013) 


(wird durch NEW-PAGE ersetzt, wenn dies in der Nachricht bereits vorkam); n wird 
durch eine abdruckbare Ziffer hinter dem Steuerzeichen angegeben. 


CONT-ACT-POS 

Beginn der Druckausgabe an der augenblicklichen Position des Druckwagens (nicht 
auf der nächsten Zeile). 

Logische Steuerzeichen werden am Nachrichtenende nicht zuruckgesetzt. Um von 
einem definierten Zustand ausgehen zu können, muß beim erstmaligen Verwenden 
von CAP in einer Ausgabesequenz auf den Zeilenanfang positioniert werden 
(NEW-LINE, NEW-PAGE oder CONT-LINE-N). CONT-ACT-POS ist nur als erstes 
Zeichen einer Nachricht zulässig. 


EMPH-LAYOUT1 
Die nachfolgenden Textzeichen werden hervorgehoben an der Datenstation 
abgebildet (siehe Manual DCAM Makroaufrufe, Tabelle 3-1). 


EMPH-LAYOUT2 
Die nachfolgenden Textzeichen werden hervorgehoben an der Datenstation 
abgebildet (siehe Manual DCAM Makroaufrufe, Tabelle 3-1). 


EMPH-LAVOUT3 
Die nachfolgenden Textzeichen werden hervorgehoben an der Datenstation 
abgebildet (siehe Manual DCAM Makroaufrufe, Tabelle 3-1). 


EMPH-LAYOUT4 
Die nachfolgenden Textzeichen werden hervorgehoben an der Datenstation 
abgebildet (siehe Manual DCAM Makroaufrufe, Tabelle 3-1). 


NORMAL-LAYOUT 
Die nachfolgenden Textzeichen werden in normaler Darstellung an der Datenstation 
abgebildet. 


DARK-LAYOUT 
Der Bildschirm wird dunkel gesteuert. 
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A7-4 


PART-LINE-UP 
Der Drucker wird um eine halbe Zeile zurückgesetzt. Ein weiteres PART-LINE-UP 
kann erst nach PART-LINE-DOWN oder in einer neuen Zeile gegeben werden. 
PART-LINE-UP wird durch PART-LINE-DOWN oder am logischen Zeilenende 
zurückgesetzt. 


PART-LINE-DOWN 
Der Drucker wird um eine halbe Zeile vorgerückt. Ein weiteres PART-LINE-DOWN 
kann erst nach PART-LINE-UP oder in einer neuen Zeile gegeben werden. 
PART-LINE-DOWN wird durch PART-LINE-UP oder am logischen Zeilenende 
zurückgesetzt. 


SECOND-CHAR-SET 
Die nachfolgenden Textzeichen werden im 2. Zeichenvorrat an der Datenstation 
abgebildet (nur bei Datenstationen mit 2. Zeichenvorrat oder APL-Zusatz). 


NORMAL-CHAR-SET 
Die nachfolgenden Textzeichen werden im 1. Zeichenvorrat an der Datenstation 
abgebildet (Rücksetzen aus dem 2. Zeichenvorrat). 


START-PROT-AREA 
Die nachfolgenden Textzeichen werden am Bildschirm der Datenstation “geschitzt” 
ausgegeben, d.h. sie können nicht überschrieben und zur DVA übertragen werden. 


END-PROT-AREA 
Die nachfolgenden Textzeichen werden ungeschützt an die Datenstation ausgege- 
ben. 


START-NUM-DATA 
Als Eingabe in das ungeschützte Feld sind nur numerische Zeichen möglich. 


VERT-MOVE-IND 
Die abdruckbare Ziffer d nach dem Steuerzeichen legt den Zeilenabstand fest (nur 
nach NEW-PAGE oder SHEET-FEED-N): 


d=1 normaler Zeilenabstand (1/6 Zoll; Standardwert) 
d=2 enger Abstand (1/8 Zoll) 
d=3 enger Abstand (1/12 Zoll) 


Das Steuerzeichen ist nur für Drucker gültig. 


HORIZ-MOVE-IND 
Die abdruckbare Ziffer d nach dem Steuerzeichen legt den Zeichenabstand fest (nur 
nach NEW-LINE, NEW-PAGE, SHEET-FEED-N, CONT-LINE-N oder am Nachrichten- 


anfang): 
d=1 normaler Zeichenabstand (1/10 Zoll; Standardwert) 
d=2 Schmalschrift A (1/12 bis 1/15 Zoll) 
d=3 Schmalschrift B (1/15 bis 1/16,5 Zoll) 
Das Steuerzeichen ist nur für Drucker gültig. 
LEFT-MARGIN 


Eine 3-stellige abdruckbare Dezimalzahl nach dem Steuerzeichen definiert die Spalte, 
ab der alle nachfolgenden Zeilen beginnen sollen. Es muß eine nutzbare Zeilenlänge 
von 10 Zeichen verbleiben. LEFT-MARGIN ist nur zulässig am Nachrichtenbeginn 
oder nach NEW-LINE, NEW-PAGE, SHEET-FEED-N oder CONT-LINE-N und wirkt bis 
Nachrichtenende, wenn keine neue Festlegung erfolgt. 

Das Steuerzeichen ist nur für Drucker gültig. 


START-PROP-TYPE 
Die nachfolgenden Zeichen werden in Proportionalschrift abgedruckt. Die Spalten- 
zählung wird ausgesetzt. START-PROP-TYPE wirkt bis END-PROP-TYPE bzw. bis 
Nachrichtenende. 
Das Steuerzeichen ist nur für Drucker gültig. 


END-PROP-TYPE 
Der Abdruck in Proportionalschrift wird ausgeschaltet. 
Das Steuerzeichen ist nur für Drucker gültig. 
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MAX-LINE-LIN 
Durch eine 3-stellige Dezimalzahl nach dem Steuerzeichen wird die maximale Anzahl 
von Zeichen pro Zeile neu definiert. Sie gilt für die gesamte Dauer der Verbindung 
bzw. bis zur Neueinstellung. MAX-LINE-LEN ist nur zulässig nach NEW-PAGE oder 
SHEET-FEED-N. 


Das Steuerzeichen ist nur für Drucker gültig. 


MAX-LINE-NUM 
Durch eine 3-stellige Dezimalzahl nach dem Steuerzeichen wird die maximale Anzahl 
von Zeilen pro Seite neu definiert. Sie gilt für die gesamte Dauer der Verbindung 
bzw. bis zur Neueinstellung. MAX-LINE-NUM ist nur zulässig nach NEW-PAGE oder 
SHEET-FEED-N. 
Das Steuerzeichen ist nur für Drucker gültig. 


DELETE-CHAR 
Ein Zeichen wird aus dem Ausgabetext entfernt und nicht an die Datenstation 
weitergeleitet. 


BACKSPACE 
Das nachfolgende Textzeichen wird über dem vorangegangenen abgebildet. Dadurch 
kann ein Zeichen erzeugt werden, das nicht im Zeichenvorrat enthalten ist (nur bei 
Datenstationen mit APL-Zusatz). 


SUBSTITUTE 
Hat bei DCAM keine Bedeutung. 


PHYS-ESC 
Dieses Zeichen wird zusammen mit dem nachfolgenden unverändert übertragen 
(physikalische Steuerzeichen). Spalten- und Zeilenzählung werden ausgesetzt. 


PHYS-DC4 
Dieses Zeichen wird zusammen mit dem nachfolgenden unveràndert ubertragen 
(physikalische Steuerzeichen). Spalten- und Zeilenzahlung werden ausgesetzt. 


PHYS-HT 
Dieses Zeichen wird unverändert übertragen und bewirkt einen horizontalen 
Tabulatorsprung. Spalten- und Zeilenzählung werden ausgesetzt. 


PHYS-VT 
Dieses Zeichen wird unverändert übertragen und bewirkt einen vertikalen Tabulator- 
sprung. Spalten- und Zeilenzählung werden ausgesetzt. 


Hinweis 


Der Benutzer muß im Ausgabebereich für LINE-MODE-Steuerzeichen mit PIC X jeweils 
ein Byte definieren und mit einem MOVE das Steuerzeichen aus dem Bereich 
LINE-MODE-CONTROL-CHARACTERS dorthin übertragen. 
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Beispiel 


WORKING-STORAGE SECTION. 


* 


COPY TIAMINFO. 
COPY TIAMCTRC. 
01 OUTPUT-AREA. 


41 MSGLENGTH PIC 9(5) COMP SYNC VALUE 85. 
41 FILLER PIC X. 


41 TXT1 PIC X(36) VALUE 
"DIES. IST EIN BEISPIEL.... 
41 5፲ረ1 PIE A. 
41 TXT2 PIC X(20) VALUE 'DIESER TEXT WIRD IM '. 
41 STZ2 PIC X. 
41 TXT3 PIC X(9) VALUE 'LINE-MODE'. 
41 5ፐራ3 PIC X. 
41 TXT4 PIC X(12) VALUE " AUSGEGEBEN. '. 


* 

* 

PROCEDURE DIVISION. 
MOVE NEW-LINE TO STZ1 IN OUTPUT-AREA. 
MOVE EMPH-LAVOUTI TO STZ2 IN QUTPUT-AREA. 
MOVE NORMAL-LAVOUT TO STZ3 IN QUTPUT-AREA. 


Besonderheiten von 3270-Datenstationen 


1. Es gibt keinen Roll-up-Betrieb. Nach Erreichen der letzten Bildschirmzeile wird die 
Ausgabe in der ersten Zeile fortgesetzt. 


2. Am Ende einer Ausgabe wird nicht der Bildschirmrest geloscht, sondern nur der 
Zeilenrest und die gesamte folgende Zeile (das kann, falls die Ausgabe in der letzten 
Zeile endet, auch die erste Bildschirmzeile sein). An den Beginn der übernächsten Zeile 
wird das Anzeigesteuerzeichen NOR gesetzt. 


3. Wirkungsweise der logischen Steuerzeichen: 


— Jedes logische Steuerzeichen benötigt den Platz eines Zeichens auf dem 
Bildschirm. Die Steuerzeichen NL und VPA benötigen zwei Plätze (einen am Ende 
der Zeile, in der sie angegeben werden und einen in der Zeile, in der die Ausgabe 
fortgesetzt werden soll). Mehrere Steuerzeichen hintereinander werden zu einem 
Zeichen auf dem Bildschirm zusammengezogen. 


— Durch jedes logische Steuerzeichen wird ein neues Feld eingerichtet, sodaß bei 
Verwendung der logischen Steuerzeichen EM1 bis EM4, DAR und NOR (durch diese 
wird bei TD-Datenstationen kein neues Feld eingerichtet) mit EXTND=NO die 
Länge einer nach Modifikation wieder eingegebenen Ausgabekürzer als bei TD- 
Datenstationen sein kann. 


— Das logische Steuerzeichen NUM läßt andere Angaben zu als bei TD-Datenstatio- 
nen. 


A7-6 DCAM V8.0B, V8.1B DCAM COBOL-Aufrufe, ሀ989-ህ-275-3 


4. Wirkung der EDIT-Options: 


HCOPV Es wird immer der gesamte Bildschirm abgedruckt, so daB es zu 


EXTND 


GETFC 


mehrmaligem Ausdruck von einzelnen Ausgaben und Eingaben kommen 
kann. Genauso werden auch Ausgaben ausgedruckt, fir die zwar kein 
Abdruck verlangt ist, die aber zur Zeit des angeforderten Hardcopv-Drucks 
noch auf dem Bildschirm stehen. 


NIL-Zeichen konnen in der Eingabe nur bedingt verwendet werden, da sie 
nicht mit zur DVA übertragen werden. VTSU-B ergänzt aber alle Felder, die 
verkürzt zurückkommen durch NIL-Zeichen, so daß der Benutzer die erwartete 
Länge erhält. Kommen allerdings einzelne Felder gar nicht zurück, (z.B. wenn 
die Taste 'ERASE INPUT” gedrückt wurde), so liefert VTSU-B einen 
Returncode. 


Die Abbildung der 3270-Funktionstastencodes können sie der entsprechenden 
Tabelle im Anhang entnehmen. 
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Literatur 


© Literatur 


[ 1] TRANSDATA 
FHS 
Benutzerhandbuch 


Zielgruppe 

Programmierer 

Inhalt 

Funktion, Anwendung und Programmschnittstellen von FHS für BS2000-TIAM- 
und -DCAM-Anwendungen, Einsatz, Erstellung und Verwaltung von Formaten 
mit FHS. 

Einsatz 

Formatgesteuerter Dialogbetrieb im BS2000. 


[2] COB1 (852000) 
COBOL-Compiler 
Benutzerhandbuch 


Zielgruppe 

© COBOL-Anwender im BS2000 
Inhalt 
Bedienung des COB1-Compilers und der für die Entwicklung, das Binden, den 
Ablauf und Test von COBOL-Programmen erforderlichen Software; Aufbau des 
COB1-Systems und der erzeugten Bindemodulen; Programmierhinweise: Mel- 
dungen des Compilers sowie die COB1-Schnittstelle zu UDS. 


[ 3] COB1 (BS2000) 
COBOL-Compiler 
Beschreibung 


Zielgruppe 

COBOL-Anwender im BS2000 

Inhalt 

Struktur und Elemente eines COBOL-Programms, Ein- Ausgabe-Behandlung, 
Tabellenbearbeitung, Listenprogrammteil, Sortier- und Mischanschluß, Pro- 
grammkommunikation, Segmentierung, Testhilfeelemente. 


[4] Assembler (852000) 
Beschreibung 


Zielgruppe 

ዬ Assembler-Anwender im 852000 
Inhalt 
Assembler-Charakteristik, Assemblersprache, Makrosprache, Handhabung des 
Assemblers, Meldungen bzw. Fehlermeldungen, Flags. Beschreibung des 
Assembler-Diagnoseprogramms ADIAG. 


(51 TRANSDATA 
DCAM 
Programmschnittstellen 
Beschreibung 


Zielgruppe 

Organisatoren, Einsatzplaner, Programmierer, Systemverwalter und Netzadmini- 
stratoren 

Inhalt 

Beschreibung der Kommunikations-Zugriffsmethode DCAM (Data Communicati- 
on Access Method). 
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[6] 


[ 7] 


[8] 


[9] 


[10] 


Literatur 


BS2000 
Dienstprogramme 
Beschreibung 


Zielgruppe 

852000 Anwender (nicht privilegiert) 

Inhalt 

Dienstprogramme für den nichtprivilegierten Benutzer des BS2000. 
Einsatz 

BS2000 Teilnehmerbetrieb 


BS2000 
DVS Plattenverarbeitung 
Beschreibung 


Zielgruppe 

BS2000 Anwender, Assembler Programmierer (beide nicht privilégiert} 
Inhalt 

Funktionen des Datenverwaltungssystems im BS2000. 

DVS-Kommandos und -Makroaufrufe, Service- und Aktionsmakroaufrufe. 
Zugriffsmethoden UPAM, SAM, ISAM und EAM fur Plattendateien. 
Einsatz 

BS2000 Dialogbetrieb, Stapelbetrieb, Programmierung. 


TRANSDATA 
FHS 
Benutzerhandbuch 


Zielgruppe 

Programmierer 

Inhalt 

Funktion, Anwendung und Programmschnittstellen von FHS fur BS2000-TIAM- 


und -DCAM-Anwendungen, Einsatz, Erstellung und Verwaltung von Formaten 
mit FHS. 


Einsatz 
Formatgesteuerter Dialogbetrieb im BS2000. 


TRANSDATA 


Generierung eines Datenkommunikationssystems 
Benutzerhandbuch 


Zielgruppe 

Systemverwalter, Netzadministrator, PDN-Generierer 

Inhalt 

KOGS-Sprache, Netzbeschreibung, Struktur von KOGS-Programmen 
Einsatz 

Verarbeitungsrechner mit BS2000 


BS2000 


Kommandosprache des Organisationsprogramms 
Beschreibung 


Zielgruppe 

BS2000 Anwender (nicht privilegiert) 

Inhalt 

Alle BS2000 Systemkommandos in MORAN MAG e Reihenfolge mit Hinweisen und 
Beispielen. 

Folgende Liefereinheiten sind ችውን 

BS2000-GA, MSCF, JV, FT, TIAM 

Einsatz 

BS2000 Dialogbetrieb, Prozeduren, Stapelbetrieb 
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Literatur 


Ç [11] 852000 
Makroaufrufe an den Ablaufteil 
Beschreibung 


Zielgruppe 

852000 Assembler Programmierer (nicht privilegiert); Systemverwalter 

Inhalt 

Alle Makroaufrufe an den Ablaufteil in lexikalischer Reihenfolge mit Hinweisen 
und Beispielen; einschließlich ausgewählter Makroaufrufe für das DVS und für 
TIAM. 

Zusammenstellung der Makroaufrufe nach Anwendungsgebieten. Ausführlicher 
Lernteil über Ereignissteuerung, Serialisation, Inter-Task-Kommunikation, Con- 
tingencies. 

Einsatz 

BS2000 Anwendungsprogramme 


[12] BS2000 
Systemverwaltung 
Beschreibung 


Zielgruppe 
BS2000 Systemverwalter 
Inhalt 

G Möglichkeiten und Aufgaben des Svstemverwalters zur Steuerung und 
Verwaltung des Betriebssystems. Alle zu diesem Zweck benötigten Kommandos. 
Einsatz 


Systemverwaltung, Rechenzentrum 
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Stand 03.85 


Bestellung 


Bitte bestellen Sie Siemens-Druckschriften 'Datentechnik' 


e als Kunde mit dem Bestellformular U1450-J-Z18-1. Sie erhalten es von Ihrem Ansprech- 
partner der zuständigen Zweigniederlassung bzw. Landesgesellschaft. Er wird Sie bei der 
Auswahl der Druckschriften gern unterstützen. 


e als Siemens-Mitarbeiter mit dem 


— Inland Bestellzettel 52000 (blau), bzw. 
— Ausland Bestellzettel 52002 (weiR). 


Richten Sie Ihre Bestellung bitte an: 


ZVW LAGER 
Postfach 1500 
8510 Furth 


Bei der Bestellung geben Sie bitte die Bestellnummer vollstandig an, damit der Ausgabestand 
der Druckschrift mit der bei Ihnen eingesetzten Produkt-Version übereinstimmt. Bestellnum- 
mern finden Sie in den Schriften: 


Datentechnik 
Druckschriftenverzeichnis 
Bestell-Nr. U500 


Datentechnik 
Druckschriften-Neuerscheinungen 


Das Druckschriftenverzeichnis erscheint zweimal jahrlich und enthalt die Bestelldaten aller 
verfugbaren Druckschriften aus dem Bereich Datentechnik. 

Die Einzelblatter 'Druckschriften-Neuerscheinungen' informieren wöchentlich über neue 
Druckschriften. Sie enthalten die Bestelldaten und eine kurze Inhaltsangabe. Zur Ablage 
dieser Blatter gibt es einen Ordner mit einem Register nach Sachgebieten. Er hat die 
Bestellnummer U1050-J-Z18-1 und kostet 8,60 DM. 

Druckschriftenverzeichnis und 'Druckschriften-Neuerscheinungen' erhalten Sie kostenlos 
und auf Wunsch regelmäßig. Als Kunde wenden Sie sich bitte an Ihren Ansprechpartner der 
zuständigen Zweigniederlassung bzw. Landesgesellschaft. Als Siemens-Mitarbeiter können 
Sie sich in den Verteiler aufnehmen lassen durch ein formloses Schreiben an: 


SIEMENS AG, D OA, Otto-Hahn-Ring 6, 8000 Miinchen 83. 


Anderungen von Manualen, die keine Neuausgabe erfordern, erscheinen als 'Nachtrag' oder 
als kostenlose 'Korrektur'. Nachtràge und Korrekturen werden ebenfalls über die 'Druck- 
schriften-Neuerscheinungen” angekündigt und müssen bei Bedarf gesondert bestellt werden. 


Anstelle von Korrekturen wurden früher 'Aktualisierungen' herausgegeben. Eine Aktualisie- 
rung müssen Sie nicht bestellen, wenn danach eine Korrektur oder ein Nachtrag erschienen 
ist. Die Aktualisierung ist in diesem Fall in die Korrektur bzw. den Nachtrag eingearbeitet. 


Musterbestellungen finden Sie auf den folgenden Seiten. 


Musterbestellung Kunde ə 


Sie benötigen die Druckschrift 
"COB1 Beschreibung” auf dem Stand der Produktversion 2.1. 


Auszug aus dem Druckschriftenverzeichnis: 


ር081 COBOL-Compiler, SW-Produkt 851000, 852000 


Tabellenheft (VI. D 15/5774-01 1105 
Beschreibung (V1.30 D 15/5453-02 6970 
Nachtrag (V1. D 15/5453-03N1 3945 
Tabellenheft (V1. ሀ 15/5774-01 1105 
Beschreibung D 15/5453-02 6970 
D 15/5453-03N1 3945 
D 15/5453-04N2 1785 

2 | 0 15/5453-05ክ3 0190 J 
BE UM: 14880 
U343-J1-Z55-2 0000 
MBAS ው መክት] 3050 
OSES AGE EŻOD l: 0000 
Korrektur ሀ343-.,ህ4--255-5 + 0000 


Bestellung 


uber D-Druckschriften und -Formulare 


Lieferanschrift: 


Siemens AG 
Zweigniederlassung 
Vertrieb Datentechnik 


Firma 


StraBe/Postfach Bearbeiter 


StraBe 


PLZ 


Bestell-Zeichen: 


Hiermit bestellen wir aus dem Siemens-Druckschriftenverzeichnis Datentechnik zur Lieferung an oben genannte 
Anschrift: 


Pos] Bestelnr | Kurztitel | Menge Einzelpr.DM|_Gesamtpreis DM _ 
E BE O T f EC EEE  ፒ 
2.1፡ህ፡446-49-255፡3(:.፡፡፡፡-:. | ርዐ6 EE EE ቲቲ 
፦ ረ ም፦መ=.ሥመሕሕጮጋ ር fg 

pa RT perds KC ele 


St Be Gece! 


Ort, Datum 


Bestell-Nr. U1450-J-Z18-1 Firmenstempel und Unterschrift 


@  Musterbestellung SIEMENS-Mitarbeiter (Inland) 


Sie benötigen die Druckschrift 
"Generierung eines Datenkommunikationssystems” für BS2000 V7.1, PDN V7.0. 


Auszug aus dem Druckschriftenverzeichnis: 


Generierung eines Datenkommunikationssystems 


0) Ag | 266 | ሀ519 10100 
BEER Agee DON 830 
E Ee E E Ea A 1760 


ልበ 


ም Bestellzettel መ > 
SSMN ZVW Lager - 8510 Fürth - Postfach 1500 i 
| Nummer 


Dienststelle / Besteller Unternehmens- | Bearbeiter ra Datum 
bereich 


er 


Versandanschrift Versandart ZVW-Arbeitsnummer 
(wird von ZVW belegt) 


Zusätzlich zu Kos'enstelle u. 


Kostenart ist unbedingt der KR RK 
Rechnungsempfänger anzu- TAT 
geben (5. Ausfüllhinweise) By 


Positions-Nr. | Bestell-Nr Bezeichnung der Leistung Menge Ba Einzelpreis DM Gesamtpreis DM 


U 519-J-Z75-2 Generierung eines Datenkomm,svst. 1 1 መመል) 
U 519-41-275-3 Ponne 


K 3037 (5 2000) 9.65 Met Nr. 004 30 397 
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Sie benötigen die Druckschriften 
“Control System Command Language” und "Executive Macros” für 862000 7.1. 


Auszug aus dem Druckschriftenverzeichnis: 


Control System Command Language 


Reference Manual (V5.0) 579] Ag 128 | 0 15/5136-03-101 2720 
Revision (V5.0) 9791 Ag 80 | D 15/5136-04N1-101 0750 
Revision (V5.1) 180] Ag | 120 | D 15/5136-05N2-101 1020 
Reference Manual (V6.0) 9801 Ag | 376 | D 15/5136-06-101 3740 
(V6. 9 15/5136-07ክ1-10 1] 1190 
ANE SS = 9200 
ka 0000 
Executive Macros 
Reference Manual (V5.0) 4791 Ag | 480 | 0 15/5135-03-101 4590 
Revision (V5.0) 9791 Ag 88 | D 15/5135-04N1-101 1240 J 
Reference Manual (V5.0/V5.1) 480} Ag | 528 | D 15/5135-05-101 4000 
Reference Manual (V6.0) 680] Ag | 600 | D 15/5135-06-101 6200 
Revision . D O7N1-101} 1105 
Kefiirenċa Manus MT re 6370 
Vadate:: 0000 
A 
Nichtzutref- | ` | Bestellzettel 
fendes stre- | Siemens Aktiengesellschaft ee are 
aon ZYW-+6—Pesttech-+03—D-8000-Miinehen t= Nummer/Number/Nümero 
not 
Pe | ZVW 85 Postfach 1500 : D-8510 Fürth-Bisiohe en ጸና 
achar Io 
que no Besteller/Ordered by/Pedido por Zeichen/Reference/Referencia Datum/Date/Fecha 
corresponde 


Liefertermin/Delivery date/Plazo de suministro Unterschrift/Signature/Firma 


Versandanschrift/Forwarding address/Direcciön del destinatario Versandart/Method of dispatch/Forma de envio ZVW-Arbeitsnummer 
(wird von ZVW belegt/please leave blank/ 
favor dejar libre) 


Auftragskennz. 1 Auftragskennz. 1/Reference 1/Referencia 1 Auftragskennz. 2/Reference 2/Referencia 2 
unbedingt angeben 
Reference 1 Rechnungsempf. wr |] Lfd. Nummer 
GH haw bel Len A men 
Referencia 1 
imprescindible 
Positions-Nr. | Bestell-Nr.*/Bezeichnung der Leistung Menge Einheit | Einzelpreis Gesamtpreis 
Item Order No. */Description of service - Quantitv Unit Unit price Total price 
Pos. No. No. de pedido*/Descripciön del servicio Cantidad ን e unitario rg total 
1] 808-J-Z55-1-7600 Command Language ee, 
U 808-J 1-Z55-2-7600 Command Language ee E 


U 810-J-Z55-1-7600 Executive Macros 
U 810-J1-255-2-7600 Executive Macros 


H38-S2002-S42 Bz an ZVW, Ausland - BI. 1 - 30000x4 1.84 1108 


Stichwörter 


Querverweise sind durch Kursivdruck gekenn- 
zeichnet. 


A-Struktur 

— allgemein 2-3 

— Beschreibung 2-4ff. 

— Tabelle A1-1f. 

— Verwendung: Y... 

Abbau einer Verbindung 

Abbruch einer Verbindung 

Abfragen: YINQUIRE 

Ablaufinvarianter Code 4-12 

Absenderspezifische Warteschlange 

— CS-Operand 

— SPEC-Operand 

ACCPT-Operand 

— in der B-Struktur 2-13 

— bei YOPNCON 3-20ff. 

Adresse des Partners 

— Partnername 

— Prozessorname 

Ändern von Eigenschaften 

— einer Verbindung 

Annahme einer Aufforderung: 
Aufbau einer Verbindung 

Anwendung 

— allgemein 4-12 

— DCAM-Anwendung 

Anwendungsname 

— in der A-Struktur 2-5 

— Y... 

Anwendungsstruktur: A-Struktur 

Anzahl: Partneranzahl 

Anzeige des Zustands 3-14 

APPLICATION-Kommando A6-1 

APPSTART-Attribut 

— bei YOPNCON 3-20f. 

— in der V-Struktur 2-23 

Aufbau des Manuals 1-1f., 3-1 

Aufbau einer Verbindung 

— ACCPT-Operand 

— Wartezeiten 

— Beschreibung: YOPNCON 

— Auffordern zum Aufbau 3-20f. 

— Annahme einer Aufforderung 3-22ff. 

— Rücknahme einer Aufforderung 3-39 

Auffordern: Aufbau einer Verbindung 

Aufteilung der Nachricht 

— bei YSEND 3-40f. 

Ausführung: CALL-Aufrufe 

Auskunftssystem 4-12, 4-15 


backspace character: 

— GETBS-Attribut 
Bearbeitung eines Aufrufs 2-1 
Befehlsstruktur: B-Struktur 
Beispiele 4-1 


Stichwörter 


beliebiger Kommunikationspartner 
BELL-Operand 

— in der B-Struktur 2-14 

— bei YSEND 3-41f. 

bestimmter Kommunikationspartner 
Beziehung zweier Werte 1-3f. 
B-Struktur 

— allgemein 2-9f. 

— Beschreibung 2-9ff. 

- VOPNCON 

YSEND 

YRECEIVE 

— Tabelle A1-3f. 
Buchungssystem 4-17 


CALL-Aufrufe 

— allgemein 2-35 

ሙ Y... 

— Ausführung 2-35f. 

— Tabelle A2-1 

CA-Zustand: CS-Operand 
COB1-Übersetzer 2-35 
COBLUR(Dienstprogramm) 2-3 
COBOL-Bibliothek 2-3 

Code 

— SYSCODE-Attribut 

— CODEVAL-Attribut 

— CODELN-Attribut 
CODEIND-Operand 

— in der VTLG-Struktur 2-26 
— bei YOPNCON 3-26f. 
CODELN-Attribut 

— in der VTLG-Struktur 2-26 
— bei YOPNCON 3-26f. 
CODEPOS-Attribut 

— in der VTLG-Struktur 2-26 
CODEVAL-Attribut 

— in der VTLG-Struktur 2-27 
— bei YOPNCON 3-26f. 
CONNECTION-Kommando 

— Beispiel 4-14 

— Tabelle A5-1 
COPY-Funktion 2-3 
CS-Operand 

— in der B-Struktur 2-12 

— bei Überlaufsbehandlung 3-20f. 
— bei YOPNCON 3-20ff. 

— bei YSEND 3-40f. 

— bei YRECEIVE 3-43ff. 

— Beispiel 4-16 
CS-Zustand: CS-Operand 
CNT-Funktion 3-34 


Dateien 

— Zugriff 4-12, 4-14 

— Übermittlung 4-14 
Datengruppierung: Aufteilung 


Stichwörter 


Datenfeld: Übergabebereiche 

Datenkommunikation 4-1 

Datennamen 2-3 | 

Datensatznamen 2-3 

Datenstationen, logische 

— Format-Datenstation 

— Zeilen-Datenstation 

— EDIT-Attribut 

Datenstrukturen 

— allgemein 2-1ff. 

— Beschreibung 2-3ff. 

— Tabelle A1-1ff. 

— A-Struktur 

— B-Struktur 

— V-Struktur 

— VTLG-Struktur 

— mehrfach angelegt 2-3 

Datenüberlauf: Überlauf 

Datenübermittlung 

— Beginn 3-17 

— YSEND 

— YRECEIVE 

— YPERMIT 

— YFORBID 

Datenübermittlungsprotokoll: 
DEPROT-Attribut 

DCAM-Anwendung 

— Zustand: STP-Operand 

— Eröffnen: YOPEN 

— einfach benutzbare: SHARE-Attribut 

— mehrfach benutzbare: SHARE-Attribut 

— Zustand abfragen: YINQUIRE 

— Schließen: YCLOSE 

— Teilaufgaben 4-12, 4-18 

DCAM-Programmierer 1-1 

DCAMVER 3-1 

DEPROT-Attribut 

— in der V-Struktur 2-19 

— bei YOPNCON 3-20ff. 

Dialog 4-6 

Dialogschritt 4-12, 4-15 

: Dialogverarbeitung 4-17 

DISCO-Attribut 

— in der A-Struktur 2-7 

— bei YOPEN 3-6f. 


Eckige Klammern 1-3 
EDIT-Attribut 

— in der V-Struktur 2-22 

— bei YOPNCON 3-18ቨ. 
EDITIN-Attribut 

— in der V-Struktur 2-19 

— bei YOPNCON 3-18f. 

— bei YCHANGE 3-36f. 
EDITOUT-Attribut 

— in der V-Struktur 2-21f. 

— bei YOPNCON 3-18f. 

— bei VCHANGE 3-36f. 
Eigenschaften einer Verbindung 
Einfach benutzbare DCAM-Anwendung 
Einfache Einsatzfalle 1-5 


Einsatzfalle 4-1 

Einschritt-Dialog 1-5, 4-12, 4-15 

Eintrage: Feldinhalte 

Einzelfelder: Ubergabebereiche 

Element: Aufteilung 

Empfangen: VRECEIVE 

Ereignis 

— LETTER 3-54 

— OPENED 3-56 

— GOSIGNAL 3-58 

— LOSCON 3-60 

Eröffnen einer DCAM-Anwendung: 
YOPEN 

Existenzbezogene Aufrufe 3-1 

ExpreBnachricht 

— Kennzeichnung: NORMAL-Operand 

— senden 3-41f. 


Fehlercode 

— CALL-Aufrufe 

— Y... 

— Tabelle A4-1ff. 
Feldinhalte 

— allgemein 2-1 

— Auffinden 2-3 

— Versorgung 2-3 
FHSMAINP 2-3 
FHS-Operand 

— in der B-Struktur 2-15 
— bei YRECEIVE 3-43f. 
— bei YSEND 3-40f. 
FHS-Struktur 2-3 
FILE-Kommando 4-14 
Format-Datenstation 

— EDITIN-Attribut 

— EDITOUT-Attribut 
Funktionsfeld: YINQUIRE 


Geschweifte Klammern 1-3 
GETBS-Attribut 

— in der V-Struktur 2-20 
— bei YCHANGE 3-36f. 
GETFC-Attribut 

— in der V-Struktur 2-20 
— bei YOPNCON 

— bei YCHANGE 3-36f. 
Grenzwerte 
Großbuchstaben 

— im Manual 1-3 

— LCASE-Attribut 
Grundschritte: Verarbeitung 
Gruppe: Aufteilung 


Hardcopy-Funktion: HCOPY-Attribut 
HCOPY-Attribut 

— in der V-Struktur 2-21 

— bei YOPNCON 3-19f. 

— bei YCHANGE 3-36f. 
HOM-Attribut 

— in der V-Struktur 2-22 

— bei YOPNCON 3-19. 


— bei VCHANGE 3-36f. 


KEEP: TRUNC-Attribut 

Kennwort 

— LOGPASS-Kennwort 

— LOGPW-Kennwort 

— USEPASS-Kennwort 

— USEPW-Kennwort 

Kettungsname 

— in der A-Struktur 2-5 

— in der V-Struktur 2-19 

— bei VOPEN 

im APPLICATION-Kommando ልፀ-1 
— im CONNECTION-Kommando A6-1 
Kleinbuchstaben 

— im Manual 1-3 

— LCASE-Attribut 

Kommunikation: Datenkommunikation 
Kommunikationspartner 

— SPEC-Operand 

— Aufbau einer Verbindung 

— Beispiel 4-3 
Kommunikationsrechner: TRANSDATA 
Komplexe Einsatzfälle 4-15 

Kopieren: COPY 

Kursivdruck 1-3 


Länge 

— Nachricht 

— Verbindungsnachricht 
— Ruckgaben 

— Empfangsbereich 3-44f. 
Laufnummer der Nachricht 
— SEQNO-Operand 

— empfangen 3-44f. 
LCASE-Attribut 

— in der V-Struktur 2-21 
— bei YOPNCON 3-18f. 

— bei YCHANGE 3-36f. 
LINK: Kettungsname 
Lösungswege: Einfache Einsatzfälle 
Logische Datenstationen 
— Format-Datenstation 

— Zeilen-Datenstation 

— EDIT-Attribut 

Logische Verbindungen 
LINKMOD-Operand 

— in der A-Struktur 2-6 

— bei YOPEN 

— in der V-Struktur 2-19 
— bei YOPNCON 
LOGON-Attribut 

— in der A-Struktur 2-7 


— bei YOPEN 


LOGPASS-Kennwort 

— in der A-Struktur 2-6 

— bei YOPEN 3-4ff. 

— im APPLICATION-Kommando A6-1 
LOGPW-Kennwort 

— bei YOPNCON 3-20f. 

— Beispiel 4-14 


Stichwörter 


— im CONNECTION-Kommando A6-1 


MAXLN-Operand 

— in der Verbindungsstruktur 2-23 
Mehrfach benutzbare DCAM-Anwendung 
Mehrschrittdialog 4-15 

Metasymbole 1-3f. 

Mindesteinsatz 1-5 | 
Modellprogramm: UCON-Anwender 
Musterangaben 

— Datensatznamen 

— Datennamen 


Nachricht 

— Kennzeichnung: NORMAL-Operand 
— Aufteilung 

— maximale Länge 3-20ff. 

— senden 3-40f. 

— empfangen 3-43ff. 

— tatsächliche Länge 3-44 
Nachrichtenaufbereitung 

— EDITIN-Attribut 

— EDITOUT-Attribut 

— GETBS-Attribut 

— LCASE-Attribut 

— HCOPY-Attribut 

— EDIT-Attribut 

— YINQUIRE 
Nachrichtenverlust: YCLOSE 
Nachrichtenverteilung 

— anhand von Verteilcodes 2-3 
— CS-Operand 

new line: Numerische Konstante(21) 
Normalnachricht: Nachricht 
NORMAL-Operand 

— in der B-Struktur 2-13 

— bei YSEND 3-41f. 
Numerische Konstante(21) 2-34 


Partner: Kommunikationspartner 
Partneranzahl 3-34 
Partnercharakteristika 

— abfragen 3-32f. 

— Tabelle A5-1ff. 

Partnername 

— in der V-Struktur 2-18 

— bei YOPNCON 

— bei YINQUIRE 

— bei YCHANGE 

— bei YCLSCON 

— bei YSEND 

— bei YRECEIVE 

— im CONNECTION-Kommando A6-1 
Primärprozeß 

— YOPEN 

— Beispiel 4-12, 4-17 
PROCEDURE DIVISION 

— Aufbau des Manuals 

— Schnittstelle 
Programmierer: DCAM-Programmierer 
Programmtest 4-1 


Stichwörter 


Prozessorname 

— in der A-Struktur 2-5 
— in der V-Struktur 2-18 
— bei YOPEN 

— bei YOPNCON 

— bei YINQUIRE 

— bei YCHANGE 

— bei YCLSCON 

— bei YSEND 

— bei YRECEIVE 

— allgemein 4-1 

— im CONNECTION-Kommando A6-1 
Prozeßsteuerung 4-15 
PTN-Funktion 3-32f. 


Q-Operand 

— in der B-Struktur 2-12 

— bei YOPNCON 3-22ቨ. 

— bei YRECEIVE 
Quittung: Transportquittung 


Rechner-Rechner-Verkehr 4-14 

Rückgabecode 

— CALL-Aufrufe 

— Y... 

— Tabelle A4-1ff. 

Rückgaben: YINQUIRE 

Rückinformation 

— allgemein 2-1 

— CALL-Aufrufe 

— Y... 

Rückmeldung 

— allgemein 2-1 

— CALL-Aufrufe 

— Tabelle A4-1ff. 

Rückwärtsschritt-Zeichen: 
GETBS-Attribut 

Runde Klammern 1-4 


Schließen einer DCAM-Anwendung 
Schnittstelle | 
— Merkmale 1-5 

— Eigenschaften 2-1 

Senden einer Nachricht 3-40ff. 
Sender 4-14 

Sekundärprozeß 

— YOPEN 

— Beispiel 4-12f. 
SEQNO-Operand 

— in der B-Struktur 2-11 

— bei YSEND 3-40f. 
SHARE-Attribut 

— in der A-Struktur 2-7 

— bei YOPEN 

Simulation 4-1 

SPACES 2-3, 3-1 
SPEC-Operand 

— in der B-Struktur 2-12 

— bei YOPNCON 3-20ቨ. 

— bei YRECEIVE 3-46f. 

— Beispiel 4-16 


Spezialindizierung 4-15 

Standardbereiche: Übergabebereiche 

Standardwerte 1-3, 3-1 

START-Zustand: STP-Operand 

Steuerfunktion 4-12 

Steuern: Verteilcode-Zuordnung 

Steuerzeichen, logische 

— TIAMTRC 

STOP-Zustand der Anwendung: 
STP-Operand 

STP-Operand 

— in der B-Struktur 2-13 

— bei YSETLOG 3-12f. 

SYSCODE-Attribut 

— in der V-Struktur 2-23 

— bei YOPNCON 3-19f. 

— bei VCHANGE 3-37f. 

Systemanwendung: $CONSOLE 

Systembedienung 4-1 

Systemverwalter 4-17f. 


TACK-Attribut 

— in der A-Struktur 2-8 

— bei YOPEN 

TACK-Operand 

— in der B-Struktur 2-14 

— bei YSEND 3-41f. 

Teilaufgabe einer Anwendung 4-12 

Test: Programmtest 

Text der Nachricht 

TIAMCTRC A7-1 

TOP-Funktion 3-30f. 

TOVAL-Operand 

— in der B-Struktur 2-11 

— bei VOPNCON 3-22ff. 

— bei YRECEIVE 3-43ቨ. 

Transparente Datenübertragung: 
SYSCODE-Attribut 

Transportquittung 

— TACK-Attribut 

— TACK-Operand 2-8 

— Empfangen: YRECEIVE 

— Beispiel 4-14 

TRUNC-Attribut 

— in der V-Struktur 2-22 

— bei YOPNCON 3-20f. 

— bei YCHANGE 3-36f. 

Typische Einsatzfälle 4-1 


UCON-Anwender 1-5, 4-1 
Übergabebereiche 

— allgemein 2-1, 2-3 

— Beschreibung 2-29ff. 
Überlagern von Feldern 2-30 
Überlauf 

— B-Struktur 2-14 

— TRUNC-Attribut 

— YRECEIVE 

Übermittlung von Dateien 4-14 
Untergruppe: Aufteilung 
Unterprogramme: CALL-Aufrufe 


USEPASS-Kennwort 

— in der A-Struktur 2-6 

— bei VOPEN 3-2ff. 

— im APPLICATION-Kommando A6-1 
USEPW-Kennwort 

— in der A-Struktur 2-6 

— bei YOPEN 3-2ff. 

— im APPLICATION-Kommando A6-1 


Verändern des Zustands: YSETLOG 
Verarbeitung 

— eines Aufrufs 2-1 

— im Programm 4-6 

- synchrone 2-35 

- asvnchrone 2-37, 3-53 
Verarbeitungsrechner 4-1, 4-14 
Verbindungen, logische 

— Eigenschaften àndern: VCHANGE 
— Mufbau: VOPNCON 

— Abbruch: VCLOSE 

— Beschreibung 3-17 

— CS-/CA-Zustand: CS-Operand 
Verbindungsnachricht 

— bei YOPNCON 3-20f. 

— bei YINQUIRE 3-30f. 

- Beispiel 4-1ff. 
Verbindungsaufbau: 

Aufbau einer Verbindung 
Verbindungsstruktur: V-Struktur 
VERIFY-Attribut 
— in der A-Struktur 2-7 
— bei YOPEN 
Verlust: Nachrichtenverlust 
Vermittlungsprogramm 4-3 
Versorgung: Feldinhalte 
Verteilcode-Gruppe 
— Name 2-27, 2-33 
— bei YOPNCON 
— bei YCHANGE 
— bei YPERMIT 
Verteilcode-Verwendung 
— DISCO-Attribut 
— Verteilungsname 
— Verteilungsstruktur 
— Beispiel 4-17 
Verteilcode-Zuordnung 3-50f. 
Verteilungsname 
— in der A-Struktur 2-5 
— eigenes Feld 2-33 
— bei VOPEN 3-6, 3-10 
— bei VPERMIT 3-50f. 

— bei VFORBID 3-52 

— Beispiel 4-17 

— im APPLICATION-Kommando A6-1 
Verteilungsstruktur: VTLG-Struktur 
Verwaltung 4-17 
Verwaltungsprogramm 4-17 
V-Struktur 

— allgemein 2-3 

— Beschreibung 2-16ff. 

— bei YOPNCON 3-26ff. 


Stichwörter 


— Tabelle A1-5f. 
VTLG-Struktur 

— allgemein 2-3 

— Beschreibung 2-25ff. 
— bei YOPNCON 3-26f. 
— bei YCHANGE 3-36f. 
— bei VPERMIT 3-50f. 
— Tabelle A1-7 


Warteschlange der Aufforderungen: 
YINQUIRE 

Warteschlange der Befehle 

— Q-Operand 

— YCLOSE 

— TOVAL-Operand 

Warteschlange der Nachrichten 

— CS-Operand 

— YCLOSE 

— YOPNCON 

— Verteilcode-Verwendung 3-43 

Wartestruktur 2-28 

Wartezeiten 

— allgemein 2-37 

— Q-Operand 

— TOVAL-Operand 

Weitergabe 4-3 

Wiederholung eines Aufrufs 2-37 

WORKING-STORAGE SECTION 

— Aufbau des Manuals 

— Schnittstelle 


YCHANGE 3-36 

YCLOSE 3-16 

YCLSCON 

— Rücknahme 3-39 

— Abbau 3-39 

YDDCUAPL 2-3 

YDDCUCOM 2-3 

YDDCUCON 2-3 

YDDCUDIS 2-3 

YDDCUWAI 2-3 

YFORBID 3-52 

YINQUIRE 

— Zustand der Anwendung 3-14 

— vor dem Verbindungsaufbau 3-30 
— Partnercharakteristika 3-32 

— Partneranzahl 3-34 

YOPEN 

— Einfach benutzbare Anwendung 3-1 
— Mehrfach benutzbare Anwendung 3-4ff. 
— durch den Primärprozeß 3-4, 3-6 

— durch den Sekundärprozeß 3-8, 3-10 
YOPNCON 

— allgemein 3-17 

— Auffordern 3-20 

— Annahme 3-22 

— Verteilcode-Verwendung 3-26 
YPERMIT 3-50 

YRECEIVE 

— beliebiger Partner 3-43 

— bestimmter Partner 3-46 


Stichwörter 


YSEND 3-40 
YSETLOG 3-12 
YWAIT 3-53 


Zeilen-Datenstation 

— allgemein 1-5 

— EDITIN-Attribut 

— EDITOUT-Attribut 

— Beispiel 4-12 

Zeitgrenze: TOVAL-Operand 
ZEROES 2-3, 3-1 

Zugriff auf Dateien 

Zuordnung: Verteilcode-Zuordnung 
Zustand der DCAM-Anwendung 
Zwischenergebnisse 4-15 


$CONSOLE 4-1ff. 
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